Simplification of discriminant from scale-rotated-ellipse

Time bar (total: 2.3min)

start0.0ms (0%)

Memory
0.2MiB live, 0.2MiB allocated

analyze612.0ms (0.4%)

Memory
0.8MiB live, 2 002.4MiB 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.7s (5.5%)

Memory
12.1MiB live, 18 721.0MiB allocated
Samples
5.0s4 252×1valid
1.1s996×2valid
781.0ms3 008×0valid
30.0ms97×1exit
Precisions
Click to see histograms. Total time spent on operations: 6.4s
ival-sin: 1.4s (22.3% of total)
ival-cos: 1.3s (19.9% of total)
ival-div: 1.1s (17.6% of total)
ival-mult: 1.1s (17.5% of total)
ival-pow2: 784.0ms (12.3% of total)
adjust: 277.0ms (4.3% of total)
ival-sub: 165.0ms (2.6% of total)
ival-add: 135.0ms (2.1% of total)
ival-pi: 64.0ms (1% of total)
exact: 15.0ms (0.2% of total)
ival-true: 7.0ms (0.1% of total)
ival-assert: 4.0ms (0.1% of total)
Bogosity

explain1.1s (0.8%)

Memory
42.3MiB live, 3 148.9MiB allocated
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
1470-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)))
1300-0-(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
1300-0-(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
330-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))
290-1(-1.1558163820476309e-285 3.269567365497123e-156 8.962275312977803e+81 1.4052441621162507e-303 7.165346100762912e+216)(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)
250-2(8.314032613577821e-280 -3.292993362278477e+141 1.7848985291717758e-299 1.5238970151830246e-208 -5.256999966077244e-130)(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)
220-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))))
210-1(-1.1558163820476309e-285 3.269567365497123e-156 8.962275312977803e+81 1.4052441621162507e-303 7.165346100762912e+216)(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)
180-1(5.911722702738193e-232 5.6633213599083255e-189 2.8648071302552276e+221 -2.50721267749467e-56 -4.224207216662516e-304)(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)
150-0-(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))
140-1(5.911722702738193e-232 5.6633213599083255e-189 2.8648071302552276e+221 -2.50721267749467e-56 -4.224207216662516e-304)(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)
100-0-(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)
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))
01(-3.3631844462693164e-251 -4.621141902831118e-245 3.45469880357621e-19 5.677890207309497e-83 -1.9484537337090768e-229)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
cos.f64(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))sensitivity1300
sin.f64(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))sensitivity1300
-.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-rescue1200
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow162
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))overflow206
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)overflow172
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow162
(pow.f64 b #s(literal 2 binary64))overflow98
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))overflow120
(pow.f64 a #s(literal 2 binary64))overflow138
(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))overflow206
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (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)overflow94
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)overflow102
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow49
(*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))overflow128
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow29
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow76
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow34
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)overflow79
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)overflow97
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow90
(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow69
(*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale))overflow94
-.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)))cancellation270
*.f64(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.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*o200
/.f64(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (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/n200
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow81
(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))overflow103
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))overflow103
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow81
(pow.f64 b #s(literal 2 binary64))overflow49
(pow.f64 a #s(literal 2 binary64))overflow69
/.f64(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)o/n150
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow90
(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow69
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow29
/.f64(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(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/n150
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow49
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow76
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow34
-.f64(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))nan-rescue150
(pow.f64 b #s(literal 2 binary64))overflow49
(pow.f64 a #s(literal 2 binary64))overflow69
/.f64(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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/n100
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow81
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))overflow103
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow81
(pow.f64 b #s(literal 2 binary64))overflow49
(pow.f64 a #s(literal 2 binary64))overflow69
(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))overflow103
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (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))u*o90
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)underflow44
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow69
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow24
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow104
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)underflow24
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))underflow2
(*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale))underflow43
(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow27
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)overflow102
(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow69
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow29
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)overflow97
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow90
*.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*o90
/.f64(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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/n90
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow49
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow76
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow34
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)overflow79
/.f64(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)o/n80
(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow69
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow29
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)overflow97
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow90
*.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*u80
/.f64(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(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/n70
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow26
(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow73
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow105
(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow30
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))underflow2
*.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*u70
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)overflow94
(*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale))overflow94
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow49
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow76
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow34
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)overflow79
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)underflow47
(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow73
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow105
(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow30
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))underflow2
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)underflow32
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow26
/.f64(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (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/n60
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow28
(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))underflow18
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))underflow18
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow28
(pow.f64 b #s(literal 2 binary64))underflow69
(pow.f64 a #s(literal 2 binary64))underflow73
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))underflow2
/.f64(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(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))))underflow27
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow69
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow24
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow104
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))underflow2
/.f64(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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/n50
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow28
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))underflow18
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow28
(pow.f64 b #s(literal 2 binary64))underflow69
(pow.f64 a #s(literal 2 binary64))underflow73
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))underflow2
(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))underflow18
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)underflow28
/.f64(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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/n40
(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow27
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow69
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow24
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow104
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)underflow24
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))underflow2
/.f64(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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))underflow73
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow105
(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow30
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))underflow2
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)underflow32
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow26
*.f64(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.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))))overflow103
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))overflow103
(pow.f64 b #s(literal 2 binary64))overflow49
(pow.f64 a #s(literal 2 binary64))overflow69
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))underflow2
*.f64(*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale))n*u10
Confusion
Predicted +Predicted -
+1890
-3532
Precision
0.84375
Recall
1.0
Confusion?
Predicted +Predicted MaybePredicted -
+18900
-35032
Precision?
0.84375
Recall?
1.0
Freqs
test
numberfreq
032
143
267
374
421
514
65
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
359.0ms322×1valid
66.0ms144×0valid
60.0ms46×2valid
Compiler

Compiled 1 310 to 121 computations (90.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 413.0ms
ival-sin: 108.0ms (26.1% of total)
ival-cos: 81.0ms (19.6% of total)
ival-pow2: 69.0ms (16.7% of total)
ival-mult: 69.0ms (16.7% of total)
ival-div: 45.0ms (10.9% of total)
adjust: 17.0ms (4.1% of total)
ival-sub: 9.0ms (2.2% of total)
ival-add: 9.0ms (2.2% of total)
ival-pi: 4.0ms (1% of total)
ival-true: 1.0ms (0.2% of total)
exact: 1.0ms (0.2% of total)
ival-assert: 0.0ms (0% of total)

preprocess203.0ms (0.1%)

Memory
22.9MiB live, 444.5MiB 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)

prune22.0ms (0%)

Memory
-22.7MiB live, 25.7MiB allocated
Alt Table
Click to see full alt table
StatusAccuracyProgram
27.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)

simplify174.0ms (0.1%)

Memory
18.4MiB live, 406.4MiB 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))))

localize294.0ms (0.2%)

Memory
-16.2MiB live, 874.1MiB allocated
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
accuracy7.730267608406759
(*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))
accuracy28.58985228771766
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
accuracy28.89763358043234
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
accuracy36.10021978563081
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 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
188.0ms161×1valid
27.0ms23×2valid
22.0ms72×0valid
Compiler

Compiled 598 to 41 computations (93.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 191.0ms
ival-sin: 43.0ms (22.5% of total)
ival-cos: 38.0ms (19.9% of total)
ival-mult: 35.0ms (18.3% of total)
ival-pow2: 25.0ms (13.1% of total)
ival-div: 22.0ms (11.5% of total)
ival-sub: 12.0ms (6.3% of total)
adjust: 9.0ms (4.7% of total)
ival-add: 5.0ms (2.6% of total)
ival-pi: 2.0ms (1% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series143.0ms (0.1%)

Memory
2.1MiB live, 437.0MiB 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 (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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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/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 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 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
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
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))
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)))
5.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))
5.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))

simplify355.0ms (0.3%)

Memory
-0.0MiB live, 919.6MiB 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
0852515091
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/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))))
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 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 a #s(literal 4 binary64))))
(+ (* -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 a (*.f64 a (*.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))))))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 a #s(literal 4 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)))) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (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 #s(literal 4 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))))) (*.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)))))))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 a #s(literal 4 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)))) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (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 #s(literal 4 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))))) (*.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)))))))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 a #s(literal 4 binary64)))))
(* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64))))
(* (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 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 (*.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)))))))
(* (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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64))))
(* (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 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 (*.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)))))))
(* (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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64))))
(+ (* -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 (*.f64 a a) (*.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)))))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))
(+ (* 4 (/ (* (pow b 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 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 #s(literal 4 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))))))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))
(+ (* 4 (/ (* (pow b 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 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 #s(literal 4 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))))))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 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))))
(*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 a #s(literal 4 binary64))))
(* (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 (*.f64 b b) (*.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 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #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 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 (*.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)) (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 (*.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)) (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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 a #s(literal 4 binary64))))
(* (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 (*.f64 b b) (*.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 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #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 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 (*.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)) (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 (*.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)) (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 #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)))))))
(* (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) (fma.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))))))) (*.f64 #s(literal 4 binary64) (*.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 #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)))))))
(* (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 #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)))) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 (*.f64 angle angle) #s(literal 4 binary64)) (fma.f64 angle (*.f64 angle (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (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))))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (*.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 (cos.f64 (*.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 a a)))
(+ (* -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 (*.f64 (cos.f64 (*.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 b b)) (*.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 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (*.f64 a a))))
(+ (* -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 (*.f64 (cos.f64 (*.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 b b)) (*.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 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (*.f64 a a))))
(+ (* -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 (*.f64 (cos.f64 (*.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 b b)) (*.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 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (*.f64 a a))))
(* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(*.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 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 b b)))
(* (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 (*.f64 (cos.f64 (*.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)))) (*.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 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 (*.f64 (cos.f64 (*.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)))) (*.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 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 (*.f64 (cos.f64 (*.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)))) (*.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 b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(*.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 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 b b)))
(* (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 (*.f64 (cos.f64 (*.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)))) (*.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 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 (*.f64 (cos.f64 (*.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)))) (*.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 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 (*.f64 (cos.f64 (*.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)))) (*.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 b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(*.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 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 b b)))
(+ (* -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 (*.f64 (cos.f64 (*.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 b b)) (*.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 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (*.f64 a a))))
(+ (* -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 (*.f64 (cos.f64 (*.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 b b)) (*.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 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (*.f64 a a))))
(+ (* -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 (*.f64 (cos.f64 (*.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 b b)) (*.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 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (*.f64 a a))))
(* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(*.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 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (*.f64 a a)))
(* (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 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 (*.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 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 (*.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 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 (*.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 (cos.f64 (*.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 a a)))
(* (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 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 (*.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 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 (*.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 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 (*.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 (*.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 (*.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)) (/.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) (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 (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 #s(literal 2 binary64) (*.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/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 (*.f64 angle angle) #s(literal 2 binary64)) (fma.f64 angle (*.f64 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 (*.f64 #s(literal -1/881596846080000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.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 (/.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 #s(literal 2 binary64) (*.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 (+.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 #s(literal 2 binary64) (*.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 (+.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 #s(literal 2 binary64) (*.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 (+.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 #s(literal 2 binary64) (*.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 (+.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 #s(literal 2 binary64) (*.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 (+.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 #s(literal 2 binary64) (*.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 (+.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 #s(literal 2 binary64) (*.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 (+.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 #s(literal 2 binary64) (*.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 (+.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 #s(literal 2 binary64) (*.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 (+.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 #s(literal 2 binary64) (*.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 (+.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 #s(literal 2 binary64) (*.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 (+.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 #s(literal 2 binary64) (*.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 (+.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 #s(literal 2 binary64) (*.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 (+.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 #s(literal 2 binary64) (*.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 (+.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 #s(literal 2 binary64) (*.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 (+.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 #s(literal 2 binary64) (*.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 (+.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 #s(literal 2 binary64) (*.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 (+.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 #s(literal 2 binary64) (*.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 (+.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 #s(literal 2 binary64) (*.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 (+.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 #s(literal 2 binary64) (*.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 (+.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 #s(literal 2 binary64) (*.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 (+.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 #s(literal 2 binary64) (*.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 (+.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 #s(literal 2 binary64) (*.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 (+.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 #s(literal 2 binary64) (*.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 (+.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 #s(literal 2 binary64) (*.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 (+.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 #s(literal 2 binary64) (*.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 (+.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 #s(literal 2 binary64) (*.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 (+.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 #s(literal 2 binary64) (*.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 (+.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 #s(literal 2 binary64) (*.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 (+.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 #s(literal 2 binary64) (*.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 (+.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 #s(literal 2 binary64) (*.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 (+.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 #s(literal 2 binary64) (*.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 (+.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 #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)))) (*.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 (*.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 (*.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 b b) (/.f64 (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) a) a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 b (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 (*.f64 a 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 #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)))) (*.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 b (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 (*.f64 a 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 b b) (/.f64 (fma.f64 b (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 a (*.f64 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)))) (fma.f64 (*.f64 a a) (/.f64 (fma.f64 a (*.f64 a (*.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)) b) b)) (*.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 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) a) a))) (*.f64 x-scale (*.f64 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 x-scale (*.f64 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 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) a) a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 b (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 (*.f64 a 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 #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)))) (*.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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 y-scale y-scale)))) (*.f64 x-scale x-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 angle angle) (*.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)) (* 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))))
1
#s(literal 1 binary64)
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))
(fma.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/64800 binary64)) #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 (PI.f64) (*.f64 (PI.f64) #s(literal -1/64800 binary64)) (*.f64 (*.f64 angle angle) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/25194240000 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 (*.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))) (*.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 b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64))))
(+ (* 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 (pow.f64 b #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))))))))
(+ (* 4 (/ (* (pow b 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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))
(+ (* 4 (/ (* (pow b 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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 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))))
(*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 a #s(literal 4 binary64))))
(* (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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 a #s(literal 4 binary64))))
(* (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 (*.f64 angle 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 a a) (/.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)))) (* (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 (*.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 b b) (/.f64 (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) a) a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 b (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 (*.f64 a 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 (*.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 #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 angle angle) #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 b (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 (*.f64 a 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 b b) (/.f64 (fma.f64 b (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 a (*.f64 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)))) (fma.f64 (*.f64 a a) (/.f64 (fma.f64 a (*.f64 a (*.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)) b) b)) (*.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 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) a) 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 (*.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 b b) (/.f64 (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) a) a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 b (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 (*.f64 a 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 (*.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) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 a #s(literal 4 binary64))))
(+ (* 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 (*.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 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))))))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 a #s(literal 4 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)))) (* (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 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))))))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 a #s(literal 4 binary64)))))
(* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64))))
(* (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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64))))
(* (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) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.f64 x-scale (*.f64 y-scale y-scale)))))

rewrite307.0ms (0.2%)

Memory
21.7MiB live, 819.1MiB 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)))
(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 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (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))
(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))
(/.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))

eval182.0ms (0.1%)

Memory
-0.8MiB live, 587.0MiB allocated
Compiler

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

prune241.0ms (0.2%)

Memory
2.6MiB live, 852.2MiB allocated
Pruning

34 alts after pruning (34 fresh and 0 done)

PrunedKeptTotal
New1 072341 106
Fresh000
Picked101
Done000
Total1 073341 107
Accuracy
66.6%
Counts
1 107 → 34
Alt Table
Click to see full alt table
StatusAccuracyProgram
22.6%
(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)))
25.4%
(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)))
25.4%
(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)))
22.2%
(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)))
22.1%
(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)))))
29.3%
(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)))
21.2%
(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)))
25.3%
(/.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)
23.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))
25.5%
(/.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))
31.4%
(/.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))
26.9%
(/.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))
27.7%
(-.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)))
23.6%
(-.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 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)))
28.0%
(-.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)))
27.9%
(-.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 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
29.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)) (/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 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)))
29.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) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #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)))
21.5%
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 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 (exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #s(literal 1 binary64)))) #s(literal 2 binary64))) y-scale) y-scale)))
19.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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64))))))
20.5%
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 a #s(literal 4 binary64))))))
34.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)))) #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)))
29.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 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 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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.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) (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)))
30.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) #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)))
39.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) #s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.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 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 b b))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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.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) #s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.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 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (*.f64 a a))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
20.3%
(-.f64 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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.6%
(-.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 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)))
22.8%
(-.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 a #s(literal 4 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)))
16.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))) (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)))) (*.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))))))
54.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 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
20.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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)))
43.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 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 898 to 2 858 computations (58.6% saved)

simplify215.0ms (0.2%)

Memory
-25.3MiB live, 530.0MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff320
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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-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-diff6144
(pow.f64 a #s(literal 2 binary64))
cost-diff6144
(pow.f64 b #s(literal 2 binary64))
cost-diff128
(-.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 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-diff320
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))
cost-diff384
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)
cost-diff384
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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-diff128
(-.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))))
cost-diff192
(/.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))
cost-diff320
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))
cost-diff384
(/.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))
cost-diff0
(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)))) (*.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)))))))
cost-diff0
(*.f64 angle angle)
cost-diff0
(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)))) (*.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)))))
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))) (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)))) (*.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))))))
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
6 688×lower-*.f32
6 590×lower-*.f64
3 812×lower-fma.f32
3 806×lower-/.f32
3 798×lower-fma.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01532858
02692858
15602744
220772732
365942732
080722693
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
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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))))))
(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)))) (*.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)))))
(*.f64 angle 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)))) (*.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)))))))
#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))))
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64))))
(*.f64 (+.f64 b a) (-.f64 b a))
(+.f64 b a)
b
a
(-.f64 b a)
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))
(*.f64 (PI.f64) (PI.f64))
(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 #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))))))
#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 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 (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 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b))))
(fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))
#s(literal -1/32400 binary64)
(*.f64 a a)
(*.f64 #s(literal 1/32400 binary64) (*.f64 b b))
#s(literal 1/32400 binary64)
(*.f64 b b)
(/.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 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 (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 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))
(*.f64 #s(literal 1/32400 binary64) (*.f64 a a))
(/.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 (-.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 (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 (/.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 x-scale (*.f64 x-scale y-scale)))
(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 (+.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)
(*.f64 x-scale (*.f64 x-scale y-scale))
x-scale
(*.f64 x-scale y-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)))
(/.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 #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 (*.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 #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 #s(literal 1/2 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 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(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))))))
(fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.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)
(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 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 (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))
(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 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))
#s(literal 4 binary64)
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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))))
(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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (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
#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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (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)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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)))))
(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))
(/.f64 (pow.f64 (sin.f64 (*.f64 #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)))
(*.f64 x-scale (*.f64 y-scale y-scale))
(*.f64 y-scale y-scale)
(*.f64 #s(literal 4 binary64) (pow.f64 b #s(literal 4 binary64)))
#s(literal 4 binary64)
(pow.f64 b #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 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.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 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a))
(*.f64 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 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
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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))))))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 a #s(literal -1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 a (*.f64 (*.f64 a (*.f64 (PI.f64) (PI.f64))) (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))))))
(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)))) (*.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)))))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 a #s(literal -1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 a (*.f64 (*.f64 a (*.f64 (PI.f64) (PI.f64))) (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))))))
(*.f64 angle 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)))) (*.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)))))))
(fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 a #s(literal -1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 a (*.f64 (*.f64 a (*.f64 (PI.f64) (PI.f64))) (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))))
#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))))
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64))))
(*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))))
(*.f64 (+.f64 b a) (-.f64 b a))
(+.f64 b a)
b
a
(-.f64 b a)
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))
(*.f64 (PI.f64) (PI.f64))
(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 #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 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 a #s(literal -1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 a (*.f64 (*.f64 a (*.f64 (PI.f64) (PI.f64))) (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
#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)))))
(fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 a #s(literal -1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 a (*.f64 (*.f64 a (*.f64 (PI.f64) (PI.f64))) (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.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 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 a #s(literal -1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 y-scale (*.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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 a #s(literal -1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.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 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 a #s(literal -1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))
(fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))
(fma.f64 a (*.f64 a #s(literal -1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))
#s(literal -1/32400 binary64)
(*.f64 a a)
(*.f64 #s(literal 1/32400 binary64) (*.f64 b b))
(*.f64 (*.f64 b b) #s(literal 1/32400 binary64))
#s(literal 1/32400 binary64)
(*.f64 b b)
(/.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 a (*.f64 (*.f64 a (*.f64 (PI.f64) (PI.f64))) (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.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 a (*.f64 (*.f64 a (*.f64 (PI.f64) (PI.f64))) (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))))
(*.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 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))))
(fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))
(fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))
(*.f64 #s(literal 1/32400 binary64) (*.f64 a a))
(*.f64 (*.f64 a a) #s(literal 1/32400 binary64))
(/.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 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a))
(*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))
(*.f64 #s(literal -4 binary64) (*.f64 b b))
(/.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 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 2 binary64)) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (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 (*.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)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-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 (/.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 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (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 (*.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)))))) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 2 binary64)) (*.f64 y-scale (*.f64 x-scale x-scale))))
(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 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (neg.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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 2 binary64)) (*.f64 y-scale (*.f64 x-scale x-scale)))
(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 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 2 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 (+.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)
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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))
(*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))
#s(literal 2 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))
angle
#s(literal 1/180 binary64)
(PI.f64)
(*.f64 x-scale (*.f64 x-scale y-scale))
(*.f64 y-scale (*.f64 x-scale x-scale))
x-scale
(*.f64 x-scale y-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)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (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 (*.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)))))) (*.f64 y-scale (*.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) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.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 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (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 (*.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)))))) (*.f64 y-scale (*.f64 x-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) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.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)))))
(/.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 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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))
(*.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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (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 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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #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 (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) (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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
(cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))
(*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #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 (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 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))
(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 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.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))))
(*.f64 b (-.f64 #s(literal 1/2 binary64) (*.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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))
(*.f64 a a)
(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 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 #s(literal -4 binary64) (*.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 (+.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 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 2 binary64)) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-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 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 2 binary64)) (*.f64 y-scale (*.f64 y-scale (*.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))
(pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) 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 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) 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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))
(*.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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))
(*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))
#s(literal 2 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))
angle
#s(literal 1/180 binary64)
(PI.f64)
x-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 (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 (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 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale))
(/.f64 (*.f64 #s(literal 4 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)))) (*.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))))
(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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64))))))
(-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (*.f64 x-scale y-scale)) (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (*.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 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 4 binary64) (pow.f64 b #s(literal 4 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 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (*.f64 x-scale y-scale)) (/.f64 (cos.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 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (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 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (cos.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 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (cos.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 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))))
(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))
(*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))
#s(literal 2 binary64)
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))
(*.f64 (+.f64 b a) (-.f64 b a))
(pow.f64 b #s(literal 2 binary64))
(*.f64 b b)
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
#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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))
#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 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 4 binary64) (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)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64))))
(*.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 4 binary64) (pow.f64 b #s(literal 4 binary64)))))
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #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 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))
(*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))
#s(literal 1/180 binary64)
(*.f64 angle (PI.f64))
(/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #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 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))
(*.f64 x-scale (*.f64 y-scale y-scale))
(*.f64 y-scale (*.f64 x-scale y-scale))
(*.f64 y-scale y-scale)
(*.f64 #s(literal 4 binary64) (pow.f64 b #s(literal 4 binary64)))
#s(literal 4 binary64)
(pow.f64 b #s(literal 4 binary64))

localize1.1s (0.8%)

Memory
26.4MiB live, 3 466.0MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy23.97712182539039
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
accuracy24.228095657343626
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
accuracy24.228095657343626
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
accuracy30.102145874430526
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64))))))
accuracy23.97712182539039
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
accuracy24.087860182835712
(sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
accuracy24.228095657343626
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
accuracy30.102145874430526
(-.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 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)))
accuracy15.739223807752897
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))
accuracy24.087854332735812
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
accuracy24.087860182835712
(sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
accuracy28.133082077136528
(-.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))))
accuracy13.28081864789553
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
accuracy13.972225978477734
(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)))))
accuracy14.115305235215766
(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)))) (*.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)))))
accuracy42.28444937423911
(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)))) (*.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)))))))
accuracy2.066718214249223
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
accuracy7.423148462301018
(*.f64 x-scale (*.f64 y-scale y-scale))
accuracy13.208133715210797
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a))
accuracy13.28081864789553
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
Samples
402.0ms143×1valid
323.0ms86×2valid
26.0ms2exit
22.0ms20×1exit
14.0ms4exit
7.0ms5exit
7.0ms3exit
Compiler

Compiled 2 710 to 128 computations (95.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 667.0ms
ival-mult: 188.0ms (28.2% of total)
ival-cos: 85.0ms (12.8% of total)
ival-sin: 83.0ms (12.5% of total)
ival-div: 77.0ms (11.6% of total)
const: 72.0ms (10.8% of total)
adjust: 53.0ms (8% of total)
ival-pow2: 50.0ms (7.5% of total)
ival-add: 28.0ms (4.2% of total)
ival-sub: 17.0ms (2.6% of total)
ival-neg: 6.0ms (0.9% of total)
ival-pi: 3.0ms (0.5% of total)
ival-pow: 3.0ms (0.5% of total)
exact: 1.0ms (0.2% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series340.0ms (0.2%)

Memory
3.5MiB live, 996.7MiB allocated
Counts
29 → 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 (*.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 #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<representation binary64>) () ())
#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())
#s(alt (*.f64 angle angle) (patch (*.f64 angle angle) #<representation binary64>) () ())
#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())
#s(alt (/.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)) (patch (/.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)) #<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 (-.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)) (patch (/.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)) #<representation binary64>) () ())
#s(alt (-.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)))) (patch (-.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)))) #<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 (/.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 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 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 (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))))) (patch (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))))) #<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 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 (-.f64 #s(literal 1/2 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 (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 (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) #<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>) () ())
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 (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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))) (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)))) (*.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)))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 angle) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<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) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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 (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)))) (*.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))))) (patch (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)))) (*.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))))) #<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) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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 (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)))) (*.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))))) (patch (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)))) (*.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))))) #<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) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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 (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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 inf angle) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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 inf angle) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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 inf angle) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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 inf angle) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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 -inf angle) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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 -inf angle) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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 -inf angle) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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 -inf angle) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor 0 b) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/8100 (/ (* (pow angle 2) (* b (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* b (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* b (+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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) (+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* b (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* b (+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow angle 2) (* b (* (pow (PI) 2) (+ (* -2 a) (* 2 a))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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) (+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (* (pow b 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (taylor inf b) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -4 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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)))))) (taylor inf b) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -4 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow b 3) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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))))))) (taylor inf b) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (* (pow b 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (taylor -inf b) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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))))))) b)) (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2))))) b)) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (taylor -inf b) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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)))))))) b)) (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2))))) b)) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (taylor -inf b) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor 0 a) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/8100 (/ (* a (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* a (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* a (+ (* -4 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* a (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* a (+ (* -4 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* a (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (taylor inf a) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -4 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow a 2)))))) (taylor inf a) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -4 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow a 3) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow a 2))))))) (taylor inf a) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (taylor -inf a) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) a)) (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2))))) a)) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (taylor -inf a) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) a)) (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2))))) a)) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (taylor -inf a) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 y-scale) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 y-scale) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 y-scale) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 y-scale) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (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)))) (*.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))))) (patch (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)))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (pow angle 2) (taylor 0 angle) (#s(alt (*.f64 angle angle) (patch (*.f64 angle angle) #<representation binary64>) () ())) ())
#s(alt (pow angle 2) (taylor 0 angle) (#s(alt (*.f64 angle angle) (patch (*.f64 angle angle) #<representation binary64>) () ())) ())
#s(alt (pow angle 2) (taylor 0 angle) (#s(alt (*.f64 angle angle) (patch (*.f64 angle angle) #<representation binary64>) () ())) ())
#s(alt (pow angle 2) (taylor 0 angle) (#s(alt (*.f64 angle angle) (patch (*.f64 angle angle) #<representation binary64>) () ())) ())
#s(alt (pow angle 2) (taylor inf angle) (#s(alt (*.f64 angle angle) (patch (*.f64 angle angle) #<representation binary64>) () ())) ())
#s(alt (pow angle 2) (taylor inf angle) (#s(alt (*.f64 angle angle) (patch (*.f64 angle angle) #<representation binary64>) () ())) ())
#s(alt (pow angle 2) (taylor inf angle) (#s(alt (*.f64 angle angle) (patch (*.f64 angle angle) #<representation binary64>) () ())) ())
#s(alt (pow angle 2) (taylor inf angle) (#s(alt (*.f64 angle angle) (patch (*.f64 angle angle) #<representation binary64>) () ())) ())
#s(alt (pow angle 2) (taylor -inf angle) (#s(alt (*.f64 angle angle) (patch (*.f64 angle angle) #<representation binary64>) () ())) ())
#s(alt (pow angle 2) (taylor -inf angle) (#s(alt (*.f64 angle angle) (patch (*.f64 angle angle) #<representation binary64>) () ())) ())
#s(alt (pow angle 2) (taylor -inf angle) (#s(alt (*.f64 angle angle) (patch (*.f64 angle angle) #<representation binary64>) () ())) ())
#s(alt (pow angle 2) (taylor -inf angle) (#s(alt (*.f64 angle angle) (patch (*.f64 angle angle) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 b) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* b (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor 0 b) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* b (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2)))) (* b (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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 b) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* b (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2)))) (* b (+ (* 1/8100 (/ (* b (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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 b) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor inf b) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))))))))) (taylor inf b) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow b 3) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))))))))) (taylor inf b) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor -inf b) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1/8100 (/ (* (pow (PI) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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))))) b)) (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))))) b)) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8100 (/ (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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)))))) b)) (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))))) b)) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 a) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* a (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor 0 a) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* a (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2)))) (* a (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))) (taylor 0 a) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* a (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2)))) (* a (+ (* 1/8100 (/ (* a (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))))) (taylor 0 a) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor inf a) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))))))))) (taylor inf a) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow a 3) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))))))))) (taylor inf a) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor -inf a) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1/8100 (/ (* (pow (PI) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))) a)) (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))))) a)) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8100 (/ (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) a)) (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))))) a)) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 y-scale) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 y-scale) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 y-scale) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 y-scale) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (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)))) (*.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))))))) (patch (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)))) (*.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))))))) #<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) y-scale))) (taylor 0 b) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (* (pow b 2) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) 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) y-scale)))) (taylor 0 b) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (* (pow b 2) (+ (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (* 4 (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale)))))) (taylor 0 b) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (* (pow b 2) (+ (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (* 4 (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale)))))) (taylor 0 b) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (taylor inf b) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 2))))) (taylor inf b) (#s(alt (/.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)) (patch (/.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)) #<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) 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 b 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 2)))))) (taylor inf b) (#s(alt (/.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)) (patch (/.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)) #<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) 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 b 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 2)))))) (taylor inf b) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (taylor -inf b) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 2))))) (taylor -inf b) (#s(alt (/.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)) (patch (/.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)) #<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) 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 b 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 2)))))) (taylor -inf b) (#s(alt (/.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)) (patch (/.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)) #<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) 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 b 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 2)))))) (taylor -inf b) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (taylor 0 angle) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale)))) (taylor 0 angle) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (* (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) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale))))))) (taylor 0 angle) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (* (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) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)))) (* (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))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) 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))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale))))))) (* 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) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)))))))))) (taylor 0 angle) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (taylor inf angle) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (taylor inf angle) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (taylor inf angle) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (taylor inf angle) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (taylor -inf angle) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (taylor -inf angle) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (taylor -inf angle) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (taylor -inf angle) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (taylor 0 a) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (* (pow a 2) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) 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) y-scale)))) (taylor 0 a) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (* (pow a 2) (+ (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (* 4 (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale)))))) (taylor 0 a) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (* (pow a 2) (+ (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (* 4 (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale)))))) (taylor 0 a) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (taylor inf a) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 2))))) (taylor inf a) (#s(alt (/.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)) (patch (/.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)) #<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) 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 a 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 2)))))) (taylor inf a) (#s(alt (/.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)) (patch (/.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)) #<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) 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 a 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 2)))))) (taylor inf a) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (taylor -inf a) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 2))))) (taylor -inf a) (#s(alt (/.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)) (patch (/.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)) #<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) 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 a 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 2)))))) (taylor -inf a) (#s(alt (/.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)) (patch (/.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)) #<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) 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 a 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 2)))))) (taylor -inf a) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (taylor 0 x-scale) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (taylor 0 x-scale) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (taylor 0 x-scale) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (taylor 0 x-scale) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (taylor inf x-scale) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (taylor inf x-scale) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (taylor inf x-scale) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (taylor inf x-scale) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (taylor -inf x-scale) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (taylor -inf x-scale) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (taylor -inf x-scale) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (taylor -inf x-scale) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (taylor 0 y-scale) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (taylor 0 y-scale) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (taylor 0 y-scale) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (taylor 0 y-scale) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (taylor inf y-scale) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (taylor inf y-scale) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (taylor inf y-scale) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (taylor inf y-scale) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (taylor -inf y-scale) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (taylor -inf y-scale) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (taylor -inf y-scale) (#s(alt (/.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)) (patch (/.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)) #<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) y-scale))) (taylor -inf y-scale) (#s(alt (/.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)) (patch (/.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)) #<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 (* -1 (/ (- (* 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) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (taylor 0 b) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (- (* 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) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (- (* 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) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (* b (+ (* -1 (* b (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (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)))))) (taylor 0 b) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (- (* 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) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (* b (+ (* b (+ (* -1 (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor 0 b) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (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) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) y-scale)) (taylor inf b) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))))) (taylor inf b) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (+ (* -1 (/ (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (+ (* -1 (/ (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 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)))))))) (taylor inf b) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (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) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) y-scale)) (taylor -inf b) (#s(alt (/.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)) (patch (/.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)) #<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 y-scale 2))))) (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)))) (taylor -inf b) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (* -1 (/ (- (+ (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (* b y-scale))) (/ (* (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)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) b)))) (taylor -inf b) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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)))))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2)))) b)) (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)))) (taylor -inf b) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 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) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (taylor 0 a) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (- (* 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) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (- (* 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) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (* a (+ (* -1 (* a (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (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)))))) (taylor 0 a) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (- (* 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) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (* a (+ (* a (+ (* -1 (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor 0 a) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (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) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) y-scale)) (taylor inf a) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))))) (taylor inf a) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (+ (* -1 (/ (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (+ (* -1 (/ (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 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)))))))) (taylor inf a) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (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) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) y-scale)) (taylor -inf a) (#s(alt (/.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)) (patch (/.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)) #<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 y-scale 2))))) (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)))) (taylor -inf a) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (* -1 (/ (- (+ (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (* a y-scale))) (/ (* (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)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) a)))) (taylor -inf a) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 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)))))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2)))) a)) (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)))) (taylor -inf a) (#s(alt (/.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)) (patch (/.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)) #<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 (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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1 (* (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) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale))) y-scale)) (* 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 (-.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1 (* (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) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)))) y-scale)) (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (* -1 (- (* 4 (/ (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale))) y-scale)) (* 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 (-.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1 (- (* 4 (/ (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale))) y-scale)) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (+ (* -1 (* (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) 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))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale))))) y-scale)) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (* -1 (- (* 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) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)))) y-scale)) (* -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 (-.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale)) (taylor inf angle) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale)) (taylor inf angle) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale)) (taylor inf angle) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale)) (taylor inf angle) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale)) (taylor -inf angle) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale)) (taylor -inf angle) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale)) (taylor -inf angle) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale)) (taylor -inf angle) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale))) (taylor 0 x-scale) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale))) (taylor 0 x-scale) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale))) (taylor 0 x-scale) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale))) (taylor 0 x-scale) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale))) (taylor inf x-scale) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale))) (taylor inf x-scale) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale))) (taylor inf x-scale) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale))) (taylor inf x-scale) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale))) (taylor -inf x-scale) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale))) (taylor -inf x-scale) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale))) (taylor -inf x-scale) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale))) (taylor -inf x-scale) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 (-.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 (-.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 (-.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 (-.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 (-.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 (-.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 (-.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 (-.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)) (patch (/.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)) #<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))) (* -1 (/ (* (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 (-.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)) (patch (/.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)) #<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))) (* -1 (/ (* (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 (-.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)) (patch (/.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)) #<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))) (* -1 (/ (* (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 (-.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)) (patch (/.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)) #<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))) (* -1 (/ (* (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 (-.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)) (patch (/.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)) #<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) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) (taylor 0 b) (#s(alt (-.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)))) (patch (-.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)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1 (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) 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) y-scale)))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) (taylor 0 b) (#s(alt (-.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)))) (patch (-.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)))) #<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) y-scale))) (* b (- (* b (- (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) y-scale))))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) (taylor 0 b) (#s(alt (-.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)))) (patch (-.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)))) #<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) y-scale))) (* b (- (* b (- (+ (* -1 (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) y-scale))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) y-scale))))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) (taylor 0 b) (#s(alt (-.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)))) (patch (-.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)))) #<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) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) (taylor inf b) (#s(alt (-.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)))) (patch (-.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) y-scale)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) (taylor inf b) (#s(alt (-.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)))) (patch (-.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)))) #<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) y-scale))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (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) y-scale))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))))) (taylor inf b) (#s(alt (-.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)))) (patch (-.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow b 3) (* (pow x-scale 2) y-scale)))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (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) y-scale))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))))) (taylor inf b) (#s(alt (-.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)))) (patch (-.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)))) #<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) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) (taylor -inf b) (#s(alt (-.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)))) (patch (-.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)))) #<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) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) (taylor -inf b) (#s(alt (-.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)))) (patch (-.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (+ (* -1 (/ (- (* -1 (/ (- (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) y-scale))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) y-scale))) b)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) (taylor -inf b) (#s(alt (-.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)))) (patch (-.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (+ (* -1 (/ (- (* -1 (/ (- (+ (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* b (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) y-scale))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) y-scale))) b)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) (taylor -inf b) (#s(alt (-.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)))) (patch (-.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)))) #<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) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) (taylor 0 a) (#s(alt (-.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)))) (patch (-.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)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1 (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) 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) y-scale)))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) (taylor 0 a) (#s(alt (-.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)))) (patch (-.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)))) #<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) y-scale))) (* a (- (* a (- (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) y-scale))))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) (taylor 0 a) (#s(alt (-.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)))) (patch (-.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)))) #<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) y-scale))) (* a (- (* a (- (+ (* -1 (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) y-scale))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) y-scale))))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) (taylor 0 a) (#s(alt (-.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)))) (patch (-.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)))) #<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) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) (taylor inf a) (#s(alt (-.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)))) (patch (-.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) y-scale)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) (taylor inf a) (#s(alt (-.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)))) (patch (-.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)))) #<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) y-scale))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (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) y-scale))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))))) (taylor inf a) (#s(alt (-.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)))) (patch (-.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow a 3) (* (pow x-scale 2) y-scale)))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (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) y-scale))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))))) (taylor inf a) (#s(alt (-.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)))) (patch (-.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)))) #<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) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) (taylor -inf a) (#s(alt (-.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)))) (patch (-.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)))) #<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) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) (taylor -inf a) (#s(alt (-.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)))) (patch (-.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (+ (* -1 (/ (- (* -1 (/ (- (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) y-scale))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) y-scale))) a)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) (taylor -inf a) (#s(alt (-.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)))) (patch (-.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (+ (* -1 (/ (- (* -1 (/ (- (+ (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* a (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) y-scale))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) y-scale))) a)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) (taylor -inf a) (#s(alt (-.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)))) (patch (-.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)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (taylor 0 angle) (#s(alt (-.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)))) (patch (-.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (* (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) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))))) (taylor 0 angle) (#s(alt (-.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)))) (patch (-.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (* (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) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)))) (* (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) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale))))) (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))))) (taylor 0 angle) (#s(alt (-.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)))) (patch (-.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (* (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) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)))) (* (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) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale))))) (* (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) 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))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale)))))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))))) (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))))) (taylor 0 angle) (#s(alt (-.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)))) (patch (-.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)))) #<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) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) (taylor inf angle) (#s(alt (-.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)))) (patch (-.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)))) #<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) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) (taylor inf angle) (#s(alt (-.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)))) (patch (-.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)))) #<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) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) (taylor inf angle) (#s(alt (-.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)))) (patch (-.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)))) #<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) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) (taylor inf angle) (#s(alt (-.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)))) (patch (-.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)))) #<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) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) (taylor -inf angle) (#s(alt (-.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)))) (patch (-.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)))) #<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) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) (taylor -inf angle) (#s(alt (-.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)))) (patch (-.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)))) #<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) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) (taylor -inf angle) (#s(alt (-.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)))) (patch (-.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)))) #<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) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) (taylor -inf angle) (#s(alt (-.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)))) (patch (-.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)))) #<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))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.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)))) (patch (-.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)))) #<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))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.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)))) (patch (-.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)))) #<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))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.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)))) (patch (-.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)))) #<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))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.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)))) (patch (-.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)))) #<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))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.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)))) (patch (-.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)))) #<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))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.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)))) (patch (-.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)))) #<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))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.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)))) (patch (-.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)))) #<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))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.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)))) (patch (-.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)))) #<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))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.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)))) (patch (-.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)))) #<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))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.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)))) (patch (-.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)))) #<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))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.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)))) (patch (-.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)))) #<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))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.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)))) (patch (-.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)))) #<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))) y-scale) (taylor 0 y-scale) (#s(alt (-.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)))) (patch (-.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)))) #<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))) y-scale) (taylor 0 y-scale) (#s(alt (-.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)))) (patch (-.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)))) #<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))) y-scale) (taylor 0 y-scale) (#s(alt (-.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)))) (patch (-.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)))) #<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))) y-scale) (taylor 0 y-scale) (#s(alt (-.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)))) (patch (-.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)))) #<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))) y-scale) (taylor inf y-scale) (#s(alt (-.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)))) (patch (-.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)))) #<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))) y-scale) (taylor inf y-scale) (#s(alt (-.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)))) (patch (-.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)))) #<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))) y-scale) (taylor inf y-scale) (#s(alt (-.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)))) (patch (-.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)))) #<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))) y-scale) (taylor inf y-scale) (#s(alt (-.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)))) (patch (-.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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) y-scale)) (taylor -inf y-scale) (#s(alt (-.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)))) (patch (-.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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) y-scale)) (taylor -inf y-scale) (#s(alt (-.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)))) (patch (-.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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) y-scale)) (taylor -inf y-scale) (#s(alt (-.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)))) (patch (-.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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) y-scale)) (taylor -inf y-scale) (#s(alt (-.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)))) (patch (-.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)))) #<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 a 4) (pow (sin (* 1/90 (* 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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-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 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) (* (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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-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) (pow y-scale 2))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (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) (* (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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* b (+ (* b (- (+ (/ (* 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (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) (* (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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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) (- (/ (pow (sin (* 1/90 (* 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 x-scale 2) (pow y-scale 2)))))) (taylor inf b) (#s(alt (-.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 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 (/.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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) (- (+ (/ (* (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)))) (* 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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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) (- (+ (/ (* (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))))) (+ (* 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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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) (- (+ (/ (* (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)))))) (+ (* 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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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) (- (/ (pow (sin (* 1/90 (* 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 x-scale 2) (pow y-scale 2)))))) (taylor -inf b) (#s(alt (-.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 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 (/.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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) (- (+ (* -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)))) (* 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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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) (- (+ (* -1 (/ (+ (* -1 (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (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 (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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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) (- (+ (* -1 (/ (+ (* -1 (/ (- (+ (* -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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (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 (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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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) (pow (sin (* 1/90 (* 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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-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 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) (* (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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-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) (pow y-scale 2))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (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) (* (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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* a (+ (* a (- (+ (/ (* 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (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) (* (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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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) (- (/ (pow (sin (* 1/90 (* 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 x-scale 2) (pow y-scale 2)))))) (taylor inf a) (#s(alt (-.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 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 (/.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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) (- (+ (/ (* (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)))) (* 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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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) (- (+ (/ (* (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))))) (+ (* 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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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) (- (+ (/ (* (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)))))) (+ (* 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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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) (- (/ (pow (sin (* 1/90 (* 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 x-scale 2) (pow y-scale 2)))))) (taylor -inf a) (#s(alt (-.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 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 (/.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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) (- (+ (* -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)))) (* 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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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) (- (+ (* -1 (/ (+ (* -1 (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (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 (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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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) (- (+ (* -1 (/ (+ (* -1 (/ (- (+ (* -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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (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 (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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (+ a b) 2) (pow (- b 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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b 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))) (* (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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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) (- (/ (* (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 (+ (/ (* (+ (* -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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (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) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (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) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (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) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (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) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (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) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (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) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (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) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (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) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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) (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 (* -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 (* 4 (/ (* (pow 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 (* 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/32400 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16200 (/ (* (pow a 2) (* (pow b 2) (pow (PI) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 b) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* -1/16200 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* -1/16200 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1/16200 (/ (* (pow a 2) (pow (PI) 2)) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor inf b) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1/16200 (/ (* (pow a 2) (pow (PI) 2)) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1/16200 (/ (* (pow a 2) (pow (PI) 2)) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1/16200 (/ (* (pow a 2) (pow (PI) 2)) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor -inf b) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1/16200 (/ (* (pow a 2) (pow (PI) 2)) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1/16200 (/ (* (pow a 2) (pow (PI) 2)) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16200 (/ (* (pow a 2) (* (pow b 2) (pow (PI) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 a) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* -1/16200 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* -1/16200 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1/16200 (/ (* (pow b 2) (pow (PI) 2)) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor inf a) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1/16200 (/ (* (pow b 2) (pow (PI) 2)) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1/16200 (/ (* (pow b 2) (pow (PI) 2)) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1/16200 (/ (* (pow b 2) (pow (PI) 2)) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor -inf a) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1/16200 (/ (* (pow b 2) (pow (PI) 2)) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1/16200 (/ (* (pow b 2) (pow (PI) 2)) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (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))))) (patch (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))))) #<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 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/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/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 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 (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.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 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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) (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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64)))))) #<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>) () ())) ())
Calls

261 calls:

TimeVariablePointExpression
18.0ms
a
@-inf
(+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale)))))
7.0ms
b
@0
(/ (* (/ (* 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) (+ (* 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))
6.0ms
angle
@0
(+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale)))))
5.0ms
y-scale
@0
(+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale)))))
5.0ms
y-scale
@inf
(/ (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (neg y-scale))

simplify550.0ms (0.4%)

Memory
-11.9MiB live, 1 499.7MiB allocated
Algorithm
egg-herbie
Rules
6 602×lower-fma.f64
6 602×lower-fma.f32
6 200×lower-*.f64
6 200×lower-*.f32
5 312×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0159562954
1604759932
0894858039
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 (* (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))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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)))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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) (+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(+ (* 1/8100 (/ (* (pow angle 2) (* b (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(+ (* b (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* b (+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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) (+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(+ (* b (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* b (+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow angle 2) (* b (* (pow (PI) 2) (+ (* -2 a) (* 2 a))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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) (+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow angle 2) (* (pow b 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 4) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(* (pow b 4) (+ (* -4 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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))))))
(* (pow b 4) (+ (* -4 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow b 3) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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)))))))
(* (pow angle 2) (* (pow b 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 4) (+ (* -1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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))))))) b)) (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2))))) b)) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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)))))))) b)) (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2))))) b)) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(* (pow angle 2) (+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(+ (* 1/8100 (/ (* a (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(+ (* a (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* a (+ (* -4 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(+ (* a (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* a (+ (* -4 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* a (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 4) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 4) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(* (pow a 4) (+ (* -4 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow a 2))))))
(* (pow a 4) (+ (* -4 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow a 3) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow a 2)))))))
(* (pow a 4) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 4) (+ (* -1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) a)) (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2))))) a)) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) a)) (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2))))) a)) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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)
(pow angle 2)
(pow angle 2)
(pow angle 2)
(pow angle 2)
(pow angle 2)
(pow angle 2)
(pow angle 2)
(pow angle 2)
(pow angle 2)
(pow angle 2)
(pow angle 2)
(+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* b (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* b (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2)))) (* b (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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))))))))))
(+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* b (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2)))) (* b (+ (* 1/8100 (/ (* b (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow b 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))))))))
(* (pow b 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow b 3) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))))))))))
(* (pow b 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow b 4) (+ (* -1/8100 (/ (* (pow (PI) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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))))) b)) (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))))) b)) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8100 (/ (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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)))))) b)) (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))))) b)) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* a (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* a (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2)))) (* a (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))))
(+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* a (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2)))) (* a (+ (* 1/8100 (/ (* a (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))))
(* (pow a 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow a 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))))))))
(* (pow a 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow a 3) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))))))))))
(* (pow a 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow a 4) (+ (* -1/8100 (/ (* (pow (PI) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))) a)) (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))))) a)) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8100 (/ (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) a)) (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))))) a)) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (pow x-scale 2))
(/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (pow x-scale 2))
(/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (pow x-scale 2))
(/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (pow x-scale 2))
(/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (pow x-scale 2))
(/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (pow x-scale 2))
(/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (pow x-scale 2))
(/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (pow x-scale 2))
(/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (pow x-scale 2))
(/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (pow x-scale 2))
(/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (pow x-scale 2))
(/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (pow x-scale 2))
(/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale)))
(+ (* 4 (* (pow b 2) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) 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) 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) y-scale))) (* (pow b 2) (+ (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (* 4 (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) 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) y-scale))) (* (pow b 2) (+ (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (* 4 (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) 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) 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) y-scale))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 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) 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 b 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 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) 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 b 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (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) 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) y-scale))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 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) 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 b 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 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) 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 b 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 2))))))
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) 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) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))))
(+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (* (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) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)))))))
(+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (* (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) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)))) (* (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))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) 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))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale))))))) (* 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) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) 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) 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) 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) 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) 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) 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) 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) 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) 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) y-scale)))
(+ (* 4 (* (pow a 2) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) 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) 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) y-scale))) (* (pow a 2) (+ (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (* 4 (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) 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) y-scale))) (* (pow a 2) (+ (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (* 4 (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) 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) 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) y-scale))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 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) 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 a 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 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) 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 a 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 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) 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) y-scale))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 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) 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 a 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 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) 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 a 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow 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) 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) 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) 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) 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) 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) 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) 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) 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) 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) 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) 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) 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) 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) 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) 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) 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) 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) 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) 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) 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) 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) 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) 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) y-scale)))
(* 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)))
(* -1 (/ (- (* 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) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale))
(+ (* -1 (/ (- (* 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) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* -1 (/ (- (* 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) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (* b (+ (* -1 (* b (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (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))))))
(+ (* -1 (/ (- (* 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) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (* b (+ (* b (+ (* -1 (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))))))
(* -1 (/ (* (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) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) y-scale))
(* (pow b 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow b 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (+ (* -1 (/ (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (+ (* -1 (/ (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 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))))))))
(* -1 (/ (* (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) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) y-scale))
(* (pow b 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale))))
(* (pow b 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (* -1 (/ (- (+ (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (* b y-scale))) (/ (* (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)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) b))))
(* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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)))))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2)))) b)) (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale))))
(* -1 (/ (- (* 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) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale))
(+ (* -1 (/ (- (* 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) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* -1 (/ (- (* 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) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (* a (+ (* -1 (* a (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (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))))))
(+ (* -1 (/ (- (* 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) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (* a (+ (* a (+ (* -1 (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))))))
(* -1 (/ (* (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) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) y-scale))
(* (pow a 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow a 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (+ (* -1 (/ (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (+ (* -1 (/ (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 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))))))))
(* -1 (/ (* (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) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) y-scale))
(* (pow a 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale))))
(* (pow a 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (* -1 (/ (- (+ (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (* a y-scale))) (/ (* (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)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) a))))
(* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 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)))))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2)))) a)) (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1 (* (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) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale))) y-scale)) (* 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) (+ (* -1 (* (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) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)))) y-scale)) (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (* -1 (- (* 4 (/ (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale))) y-scale)) (* 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) (+ (* -1 (- (* 4 (/ (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale))) y-scale)) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (+ (* -1 (* (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) 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))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale))))) y-scale)) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (* -1 (- (* 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) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)))) y-scale)) (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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))) (* -1 (/ (* (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))) (* -1 (/ (* (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))) (* -1 (/ (* (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))) (* -1 (/ (* (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) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale)))
(- (+ (* -1 (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) 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) y-scale)))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) 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) y-scale))) (* b (- (* b (- (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) y-scale))))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) 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) y-scale))) (* b (- (* b (- (+ (* -1 (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) y-scale))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) y-scale))))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) 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) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(* (pow b 4) (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) y-scale)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) 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) y-scale))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (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) y-scale))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))))
(* (pow b 4) (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow b 3) (* (pow x-scale 2) y-scale)))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (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) y-scale))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) 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) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) 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) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(* (pow b 4) (- (+ (* -1 (/ (- (* -1 (/ (- (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) y-scale))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) y-scale))) b)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(* (pow b 4) (- (+ (* -1 (/ (- (* -1 (/ (- (+ (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* b (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) y-scale))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) y-scale))) b)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) 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) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale)))
(- (+ (* -1 (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) 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) y-scale)))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) 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) y-scale))) (* a (- (* a (- (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) y-scale))))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) 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) y-scale))) (* a (- (* a (- (+ (* -1 (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) y-scale))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) y-scale))))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) 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) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(* (pow a 4) (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) y-scale)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) 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) y-scale))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (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) y-scale))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))))
(* (pow a 4) (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow a 3) (* (pow x-scale 2) y-scale)))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (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) y-scale))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) 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) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) 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) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(* (pow a 4) (- (+ (* -1 (/ (- (* -1 (/ (- (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) y-scale))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) y-scale))) a)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(* (pow a 4) (- (+ (* -1 (/ (- (* -1 (/ (- (+ (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* a (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) y-scale))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) y-scale))) a)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale)))
(+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (* (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) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))))))
(+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (* (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) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)))) (* (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) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale))))) (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))))))
(+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (* (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) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)))) (* (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) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale))))) (* (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) 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))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale)))))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))))) (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) 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) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) 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) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) 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) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) 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) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) 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) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) 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) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) 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) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) 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) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) 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))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (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))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (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))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (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))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (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))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (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))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (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))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (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))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (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))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (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))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (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))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (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))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (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))) 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))) 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))) 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))) 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))) 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))) 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))) 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))) y-scale)
(* -1 (/ (- (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) y-scale))
(* -1 (/ (- (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) y-scale))
(* -1 (/ (- (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) y-scale))
(* -1 (/ (- (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) y-scale))
(/ (* (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 a 4) (pow (sin (* 1/90 (* 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)))))
(- (+ (/ (* 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) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (+ (* b (+ (* b (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (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) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (+ (* b (+ (* b (- (+ (/ (* 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (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) (* (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) (- (/ (pow (sin (* 1/90 (* 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 x-scale 2) (pow y-scale 2))))))
(* (pow b 4) (- (+ (/ (* (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)))) (* 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) (- (+ (/ (* (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))))) (+ (* 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) (- (+ (/ (* (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)))))) (+ (* 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) (- (/ (pow (sin (* 1/90 (* 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 x-scale 2) (pow y-scale 2))))))
(* (pow b 4) (- (+ (* -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)))) (* 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) (- (+ (* -1 (/ (+ (* -1 (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-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 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(- (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (* 4 (/ (* (pow 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 (* (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) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (+ (* a (+ (* a (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (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) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (+ (* a (+ (* a (- (+ (/ (* 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (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) (* (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) (- (/ (pow (sin (* 1/90 (* 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 x-scale 2) (pow y-scale 2))))))
(* (pow a 4) (- (+ (/ (* (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)))) (* 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) (- (+ (/ (* (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))))) (+ (* 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) (- (+ (/ (* (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)))))) (+ (* 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) (- (/ (pow (sin (* 1/90 (* 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 x-scale 2) (pow y-scale 2))))))
(* (pow a 4) (- (+ (* -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)))) (* 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) (- (+ (* -1 (/ (+ (* -1 (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-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 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (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 (cos (* 1/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 x-scale 2) (pow y-scale 2))))
(- (* (pow angle 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) (+ (* -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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b 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))) (* (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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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) (- (/ (* (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 (+ (/ (* (+ (* -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)))))
(- (/ (* (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) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (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) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (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) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (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) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (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) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (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) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (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) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (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) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 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) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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)
(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)
(* -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)))
(* 4 (/ (* (pow 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))))
(* 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/32400 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* -1/16200 (/ (* (pow a 2) (* (pow b 2) (pow (PI) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* -1/16200 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* -1/16200 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow b 4) (+ (* -1/16200 (/ (* (pow a 2) (pow (PI) 2)) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow b 4) (+ (* -1/16200 (/ (* (pow a 2) (pow (PI) 2)) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 4) (+ (* -1/16200 (/ (* (pow a 2) (pow (PI) 2)) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow b 4) (+ (* -1/16200 (/ (* (pow a 2) (pow (PI) 2)) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow b 4) (+ (* -1/16200 (/ (* (pow a 2) (pow (PI) 2)) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 4) (+ (* -1/16200 (/ (* (pow a 2) (pow (PI) 2)) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* -1/16200 (/ (* (pow a 2) (* (pow b 2) (pow (PI) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* -1/16200 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* -1/16200 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow a 4) (+ (* -1/16200 (/ (* (pow b 2) (pow (PI) 2)) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow a 4) (+ (* -1/16200 (/ (* (pow b 2) (pow (PI) 2)) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 4) (+ (* -1/16200 (/ (* (pow b 2) (pow (PI) 2)) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow a 4) (+ (* -1/16200 (/ (* (pow b 2) (pow (PI) 2)) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow a 4) (+ (* -1/16200 (/ (* (pow b 2) (pow (PI) 2)) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 4) (+ (* -1/16200 (/ (* (pow b 2) (pow (PI) 2)) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2))) (pow x-scale 2))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2))) (pow x-scale 2))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2))) (pow x-scale 2))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2))) (pow x-scale 2))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2))) (pow x-scale 2))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2))) (pow x-scale 2))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2))) (pow x-scale 2))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2))) (pow x-scale 2))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2))) (pow x-scale 2))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2))) (pow x-scale 2))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2))) (pow x-scale 2))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2))) (pow x-scale 2))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2))) (pow y-scale 2))
(* 1/90 (* angle (PI)))
(* angle (+ (* -1/4374000 (* (pow angle 2) (pow (PI) 3))) (* 1/90 (PI))))
(* angle (+ (* 1/90 (PI)) (* (pow angle 2) (+ (* -1/4374000 (pow (PI) 3)) (* 1/708588000000 (* (pow angle 2) (pow (PI) 5)))))))
(* angle (+ (* 1/90 (PI)) (* (pow angle 2) (+ (* -1/4374000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/241061637600000000 (* (pow angle 2) (pow (PI) 7))) (* 1/708588000000 (pow (PI) 5))))))))
(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/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/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/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))))
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))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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/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 (*.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 -4 binary64) (fma.f64 (*.f64 b b) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale 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 (*.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) (PI.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 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 (*.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 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 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 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 (*.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 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.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 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) (PI.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 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 (*.f64 b b) #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) #s(literal -1/32400 binary64)))) (/.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 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.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 (*.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 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 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 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 (*.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 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.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 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 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 -4 binary64) (fma.f64 (*.f64 b b) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale 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 (*.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) (PI.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 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 (*.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 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 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 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 (*.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 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.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 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) (PI.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 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 (*.f64 b b) #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) #s(literal -1/32400 binary64)))) (/.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 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.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 (*.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 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 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 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 (*.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 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.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 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 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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 -4 binary64) (fma.f64 (*.f64 b b) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale 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 (*.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) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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 -4 binary64) (fma.f64 (*.f64 b b) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale 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 (*.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) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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 -4 binary64) (fma.f64 (*.f64 b b) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale 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 (*.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) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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))))))
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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)))))))
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (+.f64 (fma.f64 (*.f64 b b) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 angle angle)))) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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)))))))
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (+.f64 (fma.f64 (*.f64 b b) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 angle angle)))) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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)))))))
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (+.f64 (fma.f64 (*.f64 b b) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 angle angle)))) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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))))))
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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)))))))
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (+.f64 (fma.f64 (*.f64 b b) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 angle angle)))) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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)))))))
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (+.f64 (fma.f64 (*.f64 b b) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 angle angle)))) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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)))))))
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (+.f64 (fma.f64 (*.f64 b b) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 angle angle)))) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (pow angle 2) (+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (*.f64 angle angle) #s(literal 0 binary64))
(+ (* 1/8100 (/ (* (pow angle 2) (* b (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 b (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64)))
(+ (* b (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* b (+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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) (+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 b (fma.f64 b (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4050 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 angle angle) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64)))
(+ (* b (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* b (+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow angle 2) (* b (* (pow (PI) 2) (+ (* -2 a) (* 2 a))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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) (+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 b (fma.f64 b (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4050 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 angle angle) (*.f64 b (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 angle angle) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64)))
(* (pow angle 2) (* (pow b 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 angle angle) (*.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 0 binary64)))
(* (pow b 4) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 angle angle) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))))
(* (pow b 4) (+ (* -4 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 angle angle) (+.f64 #s(literal 0 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4050 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (*.f64 b b))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64)))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))))))
(* (pow b 4) (+ (* -4 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow b 3) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/8100 binary64) (fma.f64 (*.f64 angle angle) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 angle angle) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64)) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 b (*.f64 b b)))))) (*.f64 (*.f64 angle angle) (+.f64 #s(literal 0 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4050 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (*.f64 b b)))))))
(* (pow angle 2) (* (pow b 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 angle angle) (*.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 0 binary64)))
(* (pow b 4) (+ (* -1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/8100 binary64) (*.f64 (*.f64 angle angle) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))))
(* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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))))))) b)) (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2))))) b)) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) (/.f64 (-.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 angle angle) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4050 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) b)) b)))
(* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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)))))))) b)) (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2))))) b)) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) (/.f64 (-.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 angle angle) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.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 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4050 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal -1/8100 binary64) (*.f64 (*.f64 angle angle) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))))))) b)) b)))
(* (pow angle 2) (+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (*.f64 angle angle) #s(literal 0 binary64))
(+ (* 1/8100 (/ (* a (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 angle angle)) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64)))
(+ (* a (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* a (+ (* -4 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 a (fma.f64 a (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/4050 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 angle angle) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64)))
(+ (* a (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* a (+ (* -4 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* a (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 a (fma.f64 a (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/4050 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 a (*.f64 angle angle)) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 angle angle) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64)))
(* (pow a 4) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 angle angle) #s(literal 0 binary64)))
(* (pow a 4) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))))
(* (pow a 4) (+ (* -4 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (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 -4 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 angle angle) (+.f64 #s(literal 0 binary64) (/.f64 (fma.f64 #s(literal 1/4050 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (*.f64 a a))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64)))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))))))
(* (pow a 4) (+ (* -4 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow a 3) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (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 -4 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/8100 binary64) (fma.f64 (*.f64 angle angle) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 a (*.f64 a a))))) (*.f64 (*.f64 angle angle) (+.f64 #s(literal 0 binary64) (/.f64 (fma.f64 #s(literal 1/4050 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (*.f64 a a)))))))
(* (pow a 4) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 angle angle) #s(literal 0 binary64)))
(* (pow a 4) (+ (* -1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))))
(* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) a)) (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2))))) a)) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) (/.f64 (-.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 angle angle) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/4050 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) a)) a)))
(* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) a)) (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2))))) a)) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 (*.f64 angle angle) #s(literal 0 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 angle angle) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.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 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/4050 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))))) a)) (neg.f64 a))))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (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 (*.f64 b b) #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) #s(literal -1/32400 binary64)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 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 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (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 (*.f64 b b) #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) #s(literal -1/32400 binary64)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 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 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (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 (*.f64 b b) #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) #s(literal -1/32400 binary64)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 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 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (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 (*.f64 b b) #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) #s(literal -1/32400 binary64)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 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 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (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 (*.f64 b b) #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) #s(literal -1/32400 binary64)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 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 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (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 (*.f64 b b) #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) #s(literal -1/32400 binary64)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 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 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (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 (*.f64 b b) #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) #s(literal -1/32400 binary64)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 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 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (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 (*.f64 b b) #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) #s(literal -1/32400 binary64)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 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 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (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 (*.f64 b b) #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) #s(literal -1/32400 binary64)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 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 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (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 (*.f64 b b) #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) #s(literal -1/32400 binary64)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 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 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (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 (*.f64 b b) #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) #s(literal -1/32400 binary64)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 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 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (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 (*.f64 b b) #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) #s(literal -1/32400 binary64)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 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 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2))
(/.f64 (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 (*.f64 b b) #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) #s(literal -1/32400 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.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))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2))
(/.f64 (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 (*.f64 b b) #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) #s(literal -1/32400 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.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))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2))
(/.f64 (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 (*.f64 b b) #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) #s(literal -1/32400 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.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))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2))
(/.f64 (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 (*.f64 b b) #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) #s(literal -1/32400 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.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))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2))
(/.f64 (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 (*.f64 b b) #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) #s(literal -1/32400 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.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))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2))
(/.f64 (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 (*.f64 b b) #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) #s(literal -1/32400 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.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))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2))
(/.f64 (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 (*.f64 b b) #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) #s(literal -1/32400 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.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))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2))
(/.f64 (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 (*.f64 b b) #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) #s(literal -1/32400 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.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))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2))
(/.f64 (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 (*.f64 b b) #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) #s(literal -1/32400 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.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))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2))
(/.f64 (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 (*.f64 b b) #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) #s(literal -1/32400 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.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))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2))
(/.f64 (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 (*.f64 b b) #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) #s(literal -1/32400 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.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))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2))
(/.f64 (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 (*.f64 b b) #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) #s(literal -1/32400 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.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))) (*.f64 y-scale y-scale))
(pow angle 2)
(*.f64 angle angle)
(pow angle 2)
(*.f64 angle angle)
(pow angle 2)
(*.f64 angle angle)
(pow angle 2)
(*.f64 angle angle)
(pow angle 2)
(*.f64 angle angle)
(pow angle 2)
(*.f64 angle angle)
(pow angle 2)
(*.f64 angle angle)
(pow angle 2)
(*.f64 angle angle)
(pow angle 2)
(*.f64 angle angle)
(pow angle 2)
(*.f64 angle angle)
(pow angle 2)
(*.f64 angle angle)
(pow angle 2)
(*.f64 angle angle)
(+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))
#s(literal 0 binary64)
(+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* b (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(+.f64 #s(literal 0 binary64) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 b (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* b (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2)))) (* b (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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))))))))))
(+.f64 #s(literal 0 binary64) (*.f64 b (fma.f64 b (fma.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4050 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* b (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2)))) (* b (+ (* 1/8100 (/ (* b (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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)))))))))))
(+.f64 #s(literal 0 binary64) (*.f64 b (fma.f64 b (fma.f64 #s(literal 1/8100 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4050 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow b 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 0 binary64))
(* (pow b 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))))
(* (pow b 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.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 #s(literal 1/8100 binary64) (fma.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4050 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))
(* (pow b 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow b 3) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))))))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/8100 binary64) (fma.f64 (*.f64 (PI.f64) (PI.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 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/8100 binary64) (fma.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 b (*.f64 b b)))) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4050 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))
(* (pow b 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 0 binary64))
(* (pow b 4) (+ (* -1/8100 (/ (* (pow (PI) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #s(literal 0 binary64)))
(* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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))))) b)) (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))))) b)) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4050 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) b)) (neg.f64 b)))
(* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8100 (/ (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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)))))) b)) (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))))) b)) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4050 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) b)) (neg.f64 b)))
(+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))
#s(literal 0 binary64)
(+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* a (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(+.f64 #s(literal 0 binary64) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 a (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* a (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2)))) (* a (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))))
(+.f64 #s(literal 0 binary64) (*.f64 a (fma.f64 a (fma.f64 #s(literal 1/4050 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* a (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2)))) (* a (+ (* 1/8100 (/ (* a (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))))
(+.f64 #s(literal 0 binary64) (*.f64 a (fma.f64 a (fma.f64 #s(literal 1/8100 binary64) (fma.f64 a (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/4050 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow a 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 0 binary64))
(* (pow a 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))))
(* (pow a 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/8100 binary64) (fma.f64 (*.f64 (PI.f64) (PI.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 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/4050 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))
(* (pow a 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow a 3) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))))))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/8100 binary64) (fma.f64 (*.f64 (PI.f64) (PI.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 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/8100 binary64) (fma.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 a (*.f64 a a)))) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4050 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))
(* (pow a 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 0 binary64))
(* (pow a 4) (+ (* -1/8100 (/ (* (pow (PI) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #s(literal 0 binary64)))
(* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))) a)) (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))))) a)) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (fma.f64 #s(literal 1/4050 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) a)) (neg.f64 a)))
(* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8100 (/ (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) a)) (* 1/8100 (/ (* (pow (PI) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))))) a)) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/4050 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) a)) (neg.f64 a)))
(/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 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 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 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 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 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 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 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 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 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 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 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 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 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 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 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 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 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 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 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 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 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 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 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 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (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) (fma.f64 (*.f64 b b) (/.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (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) (fma.f64 (*.f64 b b) (/.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (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) (fma.f64 (*.f64 b b) (/.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (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) (fma.f64 (*.f64 b b) (/.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (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) (fma.f64 (*.f64 b b) (/.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (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) (fma.f64 (*.f64 b b) (/.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (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) (fma.f64 (*.f64 b b) (/.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (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) (fma.f64 (*.f64 b b) (/.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (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) (fma.f64 (*.f64 b b) (/.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (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) (fma.f64 (*.f64 b b) (/.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (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) (fma.f64 (*.f64 b b) (/.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (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) (fma.f64 (*.f64 b b) (/.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.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) y-scale)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 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 #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) y-scale))
(+ (* 4 (* (pow b 2) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) 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) y-scale))))
(*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (*.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)) 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)) y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 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 #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) 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) y-scale))) (* (pow b 2) (+ (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (* 4 (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))))))
(fma.f64 (*.f64 b b) (*.f64 #s(literal 4 binary64) (fma.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)) 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)) 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))) (+.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) y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 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 #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) 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) y-scale))) (* (pow b 2) (+ (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (* 4 (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))))))
(fma.f64 (*.f64 b b) (*.f64 #s(literal 4 binary64) (fma.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)) 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)) 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))) (+.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) y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 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 #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) 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) y-scale)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 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 #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) 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) y-scale))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 2)))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (*.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) 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)) 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)) y-scale))) (*.f64 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) 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 b 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (*.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) 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 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-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)) 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)) y-scale))) (*.f64 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) 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 b 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (*.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) 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 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-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)) 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)) y-scale))) (*.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) y-scale)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 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 #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) 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) y-scale))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 2)))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (*.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) 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)) 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)) y-scale))) (*.f64 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) 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 b 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (*.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) 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 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-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)) 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)) y-scale))) (*.f64 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) 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 b 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (*.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) 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 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-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)) 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)) y-scale))) (*.f64 b b))))))
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 x-scale x-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) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))))
(*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 b b) (/.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 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale) y-scale))) (/.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) y-scale))))
(+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (* (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) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)))))))
(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 (*.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 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (*.f64 (*.f64 x-scale 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 (*.f64 x-scale x-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) y-scale)))) (fma.f64 (*.f64 b b) (/.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 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale) y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 x-scale x-scale) y-scale)))
(+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (* (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) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)))) (* (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))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) 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))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale))))))) (* 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) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale))))))))))
(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 (*.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 #s(literal -1/3149280000 binary64) (*.f64 a a) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (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 #s(literal -1/3149280000 binary64) (*.f64 b b) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 (*.f64 x-scale 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 (*.f64 x-scale x-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) y-scale))))) (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 (*.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 x-scale 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 (*.f64 x-scale x-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) y-scale)))))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (/.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 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale) y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 x-scale x-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) y-scale)))
(*.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)))) (/.f64 (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) 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) y-scale)))
(*.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)))) (/.f64 (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) 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) y-scale)))
(*.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)))) (/.f64 (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) 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) y-scale)))
(*.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)))) (/.f64 (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) 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) y-scale)))
(*.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)))) (/.f64 (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) 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) y-scale)))
(*.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)))) (/.f64 (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) 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) y-scale)))
(*.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)))) (/.f64 (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) 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) y-scale)))
(*.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)))) (/.f64 (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) 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) y-scale)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 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 #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) y-scale))
(+ (* 4 (* (pow a 2) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) 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) y-scale))))
(*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (*.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)) 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)) y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 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 #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) 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) y-scale))) (* (pow a 2) (+ (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (* 4 (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))))))
(fma.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (fma.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)) 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)) 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))) (+.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) y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 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 #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) 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) y-scale))) (* (pow a 2) (+ (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (* 4 (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))))))
(fma.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (fma.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)) 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)) 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))) (+.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) y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 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 #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) 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) y-scale)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 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 #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) 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) y-scale))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 2)))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (*.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) 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)) 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)) y-scale))) (*.f64 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) 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 a 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (*.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) 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 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-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)) 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)) y-scale))) (*.f64 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) 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 a 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (*.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) 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 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-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)) 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)) y-scale))) (*.f64 a a))))))
(* 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) y-scale)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 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 #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) 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) y-scale))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 2)))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (*.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) 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)) 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)) y-scale))) (*.f64 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) 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 a 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (*.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) 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 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-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)) 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)) y-scale))) (*.f64 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) 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 a 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (*.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) 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 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-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)) 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)) y-scale))) (*.f64 a a))))))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(*.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)))) (/.f64 (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) 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) y-scale)))
(*.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)))) (/.f64 (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) 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) y-scale)))
(*.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)))) (/.f64 (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) 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) y-scale)))
(*.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)))) (/.f64 (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) 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) y-scale)))
(*.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)))) (/.f64 (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) 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) y-scale)))
(*.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)))) (/.f64 (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) 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) y-scale)))
(*.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)))) (/.f64 (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) 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) y-scale)))
(*.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)))) (/.f64 (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) 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) y-scale)))
(*.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)))) (/.f64 (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) 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) y-scale)))
(*.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)))) (/.f64 (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) 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) y-scale)))
(*.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)))) (/.f64 (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) 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) y-scale)))
(*.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)))) (/.f64 (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) 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) y-scale)))
(*.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)))) (/.f64 (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) 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) y-scale)))
(*.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)))) (/.f64 (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) 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) y-scale)))
(*.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)))) (/.f64 (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) 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) y-scale)))
(*.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)))) (/.f64 (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) 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) y-scale)))
(*.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)))) (/.f64 (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) 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) y-scale)))
(*.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)))) (/.f64 (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) 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) y-scale)))
(*.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)))) (/.f64 (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) 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) y-scale)))
(*.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)))) (/.f64 (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) 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) y-scale)))
(*.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)))) (/.f64 (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) 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) y-scale)))
(*.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)))) (/.f64 (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) 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) y-scale)))
(*.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)))) (/.f64 (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) 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) y-scale)))
(*.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)))) (/.f64 (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) y-scale))))
(* 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))
(* -1 (/ (- (* 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) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 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 #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) y-scale)) (*.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)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale))))) (neg.f64 y-scale))
(+ (* -1 (/ (- (* 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) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2))))
(-.f64 (*.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 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 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 #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) y-scale)) (*.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)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale))))) y-scale))
(+ (* -1 (/ (- (* 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) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (* b (+ (* -1 (* b (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (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))))))
(fma.f64 b (fma.f64 (fma.f64 #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)) 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)) y-scale))) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (neg.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 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 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 #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) y-scale)) (*.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)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale))))) (neg.f64 y-scale)))
(+ (* -1 (/ (- (* 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) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (* b (+ (* b (+ (* -1 (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))))))
(-.f64 (*.f64 b (fma.f64 b (-.f64 (*.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))))) (fma.f64 #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)) 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)) y-scale))) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.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)))))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 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 #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) y-scale)) (*.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)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale))))) y-scale))
(* -1 (/ (* (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) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) y-scale))
(/.f64 (*.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)) (+.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) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale))))) (neg.f64 y-scale))
(* (pow b 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-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 #s(literal 0 binary64) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) (/.f64 (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)) (+.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) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) y-scale)))
(* (pow b 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (+ (* -1 (/ (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-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 #s(literal 0 binary64) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 #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)) 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)) y-scale))) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (*.f64 b b))) (/.f64 (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)) (+.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) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) y-scale)))
(* (pow b 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (+ (* -1 (/ (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 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))))))))
(*.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 (/.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 (fma.f64 #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)) 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)) y-scale))) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (*.f64 b b))) (/.f64 (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)) (+.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) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) y-scale)))
(* -1 (/ (* (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) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) y-scale))
(/.f64 (*.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)) (+.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) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale))))) (neg.f64 y-scale))
(* (pow b 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (neg.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 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (/.f64 (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)) (+.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) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) y-scale))))
(* (pow b 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (* -1 (/ (- (+ (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (* b y-scale))) (/ (* (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)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) b))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (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)) (+.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) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 y-scale)) (/.f64 (fma.f64 #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)) 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)) y-scale))) (*.f64 b y-scale)) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))))) b)))
(* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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)))))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2)))) b)) (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (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)) (+.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) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 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 (neg.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 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (fma.f64 #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)) 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)) y-scale))) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) b)) b)))
(* -1 (/ (- (* 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) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 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 #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) y-scale)) (*.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)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale))))) (neg.f64 y-scale))
(+ (* -1 (/ (- (* 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) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2))))
(-.f64 (*.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 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 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 #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) y-scale)) (*.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)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale))))) y-scale))
(+ (* -1 (/ (- (* 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) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (* a (+ (* -1 (* a (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (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))))))
(fma.f64 a (fma.f64 (fma.f64 #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)) 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)) y-scale))) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (neg.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 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 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 #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) y-scale)) (*.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)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale))))) (neg.f64 y-scale)))
(+ (* -1 (/ (- (* 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) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (* a (+ (* a (+ (* -1 (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))))))
(-.f64 (*.f64 a (fma.f64 a (-.f64 (*.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))))) (fma.f64 #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)) 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)) y-scale))) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.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)))))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 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 #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) y-scale)) (*.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)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale))))) y-scale))
(* -1 (/ (* (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) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) y-scale))
(/.f64 (*.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)) (+.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) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale))))) (neg.f64 y-scale))
(* (pow a 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-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 #s(literal 0 binary64) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) (/.f64 (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)) (+.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) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) y-scale)))
(* (pow a 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (+ (* -1 (/ (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-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 #s(literal 0 binary64) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 #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)) 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)) y-scale))) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (*.f64 a a))) (/.f64 (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)) (+.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) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) y-scale)))
(* (pow a 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (+ (* -1 (/ (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 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))))))))
(*.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 (/.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 (fma.f64 #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)) 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)) y-scale))) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (*.f64 a a))) (/.f64 (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)) (+.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) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) y-scale)))
(* -1 (/ (* (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) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) y-scale))
(/.f64 (*.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)) (+.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) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale))))) (neg.f64 y-scale))
(* (pow a 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (neg.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 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (/.f64 (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)) (+.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) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) y-scale))))
(* (pow a 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (* -1 (/ (- (+ (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (* a y-scale))) (/ (* (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)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) a))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (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)) (+.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) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 y-scale)) (/.f64 (fma.f64 #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)) 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)) y-scale))) (*.f64 a y-scale)) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))))) a)))
(* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 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)))))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2)))) a)) (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (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)) (+.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) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 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 (neg.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 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (fma.f64 #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)) 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)) y-scale))) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.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)))) (* -1 (* (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) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale))) y-scale)) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))))))
(fma.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 (*.f64 b b) (/.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 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale) y-scale))) y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.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))) #s(literal -1/8100 binary64))) (neg.f64 (*.f64 angle angle)) (/.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) (+ (* -1 (* (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) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)))) y-scale)) (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (* -1 (- (* 4 (/ (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale))) y-scale)) (* 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) (neg.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (/.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 (*.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 x-scale 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 (*.f64 x-scale x-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) 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/196830000 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 (*.f64 b b) (/.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 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale) y-scale))) y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.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))) #s(literal -1/8100 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) (+ (* -1 (- (* 4 (/ (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale))) y-scale)) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (+ (* -1 (* (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) 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))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale))))) y-scale)) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (* -1 (- (* 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) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)))) y-scale)) (* -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) (-.f64 (*.f64 (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 angle angle) (-.f64 (/.f64 (*.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 (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) y-scale)) (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 #s(literal -1/3149280000 binary64) (*.f64 b b) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 (*.f64 x-scale 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 (*.f64 x-scale x-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) y-scale)))))) y-scale) (/.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/11957422500000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.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 (*.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 x-scale 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 (*.f64 x-scale x-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) 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/196830000 binary64)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 (*.f64 b b) (/.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 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale) y-scale))) y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.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))) #s(literal -1/8100 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))))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(/.f64 (fma.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)))) (/.f64 (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) y-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (neg.f64 y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(/.f64 (fma.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)))) (/.f64 (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) y-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (neg.f64 y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(/.f64 (fma.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)))) (/.f64 (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) y-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (neg.f64 y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(/.f64 (fma.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)))) (/.f64 (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) y-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (neg.f64 y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(/.f64 (fma.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)))) (/.f64 (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) y-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (neg.f64 y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(/.f64 (fma.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)))) (/.f64 (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) y-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (neg.f64 y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(/.f64 (fma.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)))) (/.f64 (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) y-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (neg.f64 y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(/.f64 (fma.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)))) (/.f64 (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) y-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (neg.f64 y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.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))))) y-scale) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale)))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.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))))) y-scale) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale)))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.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))))) y-scale) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale)))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.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))))) y-scale) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale)))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.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))))) y-scale) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale)))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.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))))) y-scale) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale)))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.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))))) y-scale) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale)))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.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))))) y-scale) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale)))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.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))))) y-scale) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale)))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.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))))) y-scale) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale)))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.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))))) y-scale) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale)))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.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))))) y-scale) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale)))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 (*.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (neg.f64 (*.f64 y-scale y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 (*.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (neg.f64 (*.f64 y-scale y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 (*.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (neg.f64 (*.f64 y-scale y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 (*.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (neg.f64 (*.f64 y-scale y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 (*.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (neg.f64 (*.f64 y-scale y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 (*.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (neg.f64 (*.f64 y-scale y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 (*.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (neg.f64 (*.f64 y-scale y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 (*.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (neg.f64 (*.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))) (* -1 (/ (* (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 (*.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.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))) (* -1 (/ (* (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 (*.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.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))) (* -1 (/ (* (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 (*.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.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))) (* -1 (/ (* (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 (*.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.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) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale)))
(fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 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 #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) y-scale)) (*.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)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))))
(- (+ (* -1 (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) 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) y-scale)))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale)))
(-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 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 #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) y-scale)) (*.f64 (neg.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) y-scale))))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-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) y-scale))) (* b (- (* b (- (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) y-scale))))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale)))
(-.f64 (fma.f64 b (fma.f64 b (fma.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)) 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)) y-scale))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (neg.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) y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 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 #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) y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-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) y-scale))) (* b (- (* b (- (+ (* -1 (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) y-scale))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) y-scale))))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale)))
(-.f64 (fma.f64 b (fma.f64 b (-.f64 (fma.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)) 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)) y-scale))) (*.f64 (neg.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) 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) y-scale)))) (neg.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) y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 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 #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) y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-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) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(*.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)) (+.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) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))))
(* (pow b 4) (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) y-scale)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (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)) (+.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) y-scale)) (neg.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 b (*.f64 x-scale x-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) 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) y-scale))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (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) y-scale))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))))
(*.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 (+.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) 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)) 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)) y-scale))) (*.f64 b b))) (neg.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 (*.f64 x-scale x-scale) y-scale))) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 b (*.f64 x-scale x-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) y-scale))))))
(* (pow b 4) (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow b 3) (* (pow x-scale 2) y-scale)))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (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) y-scale))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (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 (+.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) 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)) 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)) y-scale))) (*.f64 b b))) (neg.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 b (*.f64 b b)) (*.f64 (*.f64 x-scale x-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) y-scale))) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 b (*.f64 x-scale x-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) 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) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(*.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)) (+.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) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-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) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(*.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)) (+.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) 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)) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale))))))
(* (pow b 4) (- (+ (* -1 (/ (- (* -1 (/ (- (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) y-scale))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) y-scale))) b)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (-.f64 (/.f64 (*.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 #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) y-scale)) (/.f64 (-.f64 (/.f64 (fma.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)) 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)) y-scale))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (neg.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) y-scale)))) 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) y-scale))))
(* (pow b 4) (- (+ (* -1 (/ (- (* -1 (/ (- (+ (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* b (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) y-scale))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) y-scale))) b)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (-.f64 (/.f64 (*.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 #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) y-scale)) (/.f64 (-.f64 (/.f64 (fma.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)) 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)) y-scale))) (*.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)) y-scale)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (neg.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) y-scale)))) 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) 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) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale)))
(fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 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 #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) y-scale)) (*.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)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))))
(- (+ (* -1 (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) 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) y-scale)))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale)))
(-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 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 #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) y-scale)) (*.f64 (neg.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) y-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 (*.f64 x-scale x-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) y-scale))) (* a (- (* a (- (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) y-scale))))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale)))
(-.f64 (fma.f64 a (fma.f64 a (fma.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)) 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)) y-scale))) (neg.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) y-scale))))) (neg.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) y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 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 #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) y-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 (*.f64 x-scale x-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) y-scale))) (* a (- (* a (- (+ (* -1 (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) y-scale))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) y-scale))))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale)))
(-.f64 (fma.f64 a (fma.f64 a (-.f64 (fma.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)) 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)) y-scale))) (*.f64 (neg.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) 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) y-scale)))) (neg.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) y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 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 #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) y-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 (*.f64 x-scale x-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) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(*.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)) (+.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) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))))
(* (pow a 4) (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) y-scale)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (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)) (+.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) y-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 (*.f64 a (*.f64 x-scale x-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) 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) y-scale))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (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) y-scale))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))))
(*.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 (+.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) 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)) 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)) y-scale))) (*.f64 a a))) (neg.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 (*.f64 x-scale x-scale) y-scale))) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 a (*.f64 x-scale x-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) y-scale))))))
(* (pow a 4) (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow a 3) (* (pow x-scale 2) y-scale)))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (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) y-scale))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (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 (+.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) 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)) 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)) y-scale))) (*.f64 a a))) (neg.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 a (*.f64 a a)) (*.f64 (*.f64 x-scale x-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) y-scale))) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 a (*.f64 x-scale x-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) 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) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(*.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)) (+.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) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-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) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(*.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)) (+.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) 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)) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale))))))
(* (pow a 4) (- (+ (* -1 (/ (- (* -1 (/ (- (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) y-scale))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) y-scale))) a)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (-.f64 (/.f64 (*.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 #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) y-scale)) (/.f64 (-.f64 (/.f64 (fma.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)) 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)) y-scale))) (neg.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) y-scale))))) (neg.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) y-scale)))) 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) y-scale))))
(* (pow a 4) (- (+ (* -1 (/ (- (* -1 (/ (- (+ (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* a (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) y-scale))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) y-scale))) a)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (-.f64 (/.f64 (*.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 #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) y-scale)) (/.f64 (-.f64 (/.f64 (fma.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)) 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)) y-scale))) (*.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)) y-scale)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (neg.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) y-scale)))) 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) y-scale))))
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 x-scale x-scale) y-scale))
(+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (* (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) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))))))
(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 (*.f64 b b) #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) #s(literal -1/32400 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale) y-scale))) (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 x-scale x-scale) y-scale)))
(+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (* (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) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)))) (* (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) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale))))) (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))))))
(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 (*.f64 b b) #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) #s(literal -1/32400 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale) y-scale))) (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 (*.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 x-scale 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 (*.f64 x-scale x-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) 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) y-scale)) #s(literal 1/196830000 binary64))) (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 x-scale x-scale) y-scale)))
(+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (* (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) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)))) (* (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) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale))))) (* (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) 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))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale)))))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))))) (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))))))
(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 (*.f64 b b) #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) #s(literal -1/32400 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale) y-scale))) (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 (*.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 x-scale 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 (*.f64 x-scale x-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) y-scale)))) (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 (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) y-scale)) (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 #s(literal -1/3149280000 binary64) (*.f64 b b) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 (*.f64 x-scale 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 (*.f64 x-scale x-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) y-scale))))) (/.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/11957422500000 binary64)))) (neg.f64 (*.f64 (*.f64 x-scale x-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) y-scale)) #s(literal 1/196830000 binary64)))) (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 x-scale x-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) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))
(fma.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)))) (/.f64 (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) y-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-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) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))
(fma.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)))) (/.f64 (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) y-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-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) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))
(fma.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)))) (/.f64 (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) y-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-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) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))
(fma.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)))) (/.f64 (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) y-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-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) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))
(fma.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)))) (/.f64 (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) y-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-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) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))
(fma.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)))) (/.f64 (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) y-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-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) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))
(fma.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)))) (/.f64 (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) y-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-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) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))
(fma.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)))) (/.f64 (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) y-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-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))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.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))))) y-scale) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale)))) (*.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))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.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))))) y-scale) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale)))) (*.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))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.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))))) y-scale) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale)))) (*.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))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.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))))) y-scale) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale)))) (*.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))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.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))))) y-scale) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale)))) (*.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))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.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))))) y-scale) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale)))) (*.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))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.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))))) y-scale) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale)))) (*.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))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.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))))) y-scale) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale)))) (*.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))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.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))))) y-scale) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale)))) (*.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))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.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))))) y-scale) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale)))) (*.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))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.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))))) y-scale) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale)))) (*.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))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.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))))) y-scale) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale)))) (*.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))) y-scale)
(/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-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))) y-scale)
(/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-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))) y-scale)
(/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-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))) y-scale)
(/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-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))) y-scale)
(/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-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))) y-scale)
(/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-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))) y-scale)
(/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-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))) y-scale)
(/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)
(* -1 (/ (- (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) y-scale))
(/.f64 (fma.f64 #s(literal -4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (neg.f64 y-scale))
(* -1 (/ (- (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) y-scale))
(/.f64 (fma.f64 #s(literal -4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (neg.f64 y-scale))
(* -1 (/ (- (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) y-scale))
(/.f64 (fma.f64 #s(literal -4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (neg.f64 y-scale))
(* -1 (/ (- (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) y-scale))
(/.f64 (fma.f64 #s(literal -4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (neg.f64 y-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 a 2) (pow (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 b b) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)) (*.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 b b) (/.f64 (*.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 (*.f64 a a) #s(literal 1/32400 binary64)) (*.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 b b) (/.f64 (*.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 (*.f64 a a) #s(literal 1/32400 binary64)) (*.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 (*.f64 b b) #s(literal 1/32400 binary64)) (*.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 (*.f64 b b) #s(literal 1/32400 binary64)) (*.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 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)) (*.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 a 4) (pow (sin (* 1/90 (* 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 (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 #s(literal -4 binary64) (*.f64 (pow.f64 a #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 x-scale x-scale) (*.f64 y-scale y-scale)))))))
(- (+ (/ (* 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) (* (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 (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 #s(literal -4 binary64) (*.f64 (pow.f64 a #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 x-scale x-scale) (*.f64 y-scale y-scale))))))))
(- (+ (* b (+ (* b (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (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) (* (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 (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 (*.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))) (*.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 #s(literal -4 binary64) (*.f64 (pow.f64 a #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 x-scale x-scale) (*.f64 y-scale y-scale))))))))
(- (+ (* b (+ (* b (- (+ (/ (* 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (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) (* (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 (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 (*.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 (*.f64 a a) #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)))) (*.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 #s(literal -4 binary64) (*.f64 (pow.f64 a #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 x-scale x-scale) (*.f64 y-scale y-scale))))))))
(* (pow b 4) (- (/ (pow (sin (* 1/90 (* 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 x-scale 2) (pow y-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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))))))
(* (pow b 4) (- (+ (/ (* (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)))) (* 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)) (+.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 (*.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)))) (*.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 x-scale x-scale) (*.f64 y-scale y-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 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))))) (+ (* 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 (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)))) (*.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 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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) (- (+ (/ (* (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)))))) (+ (* 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 (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))))) (*.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 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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) (- (/ (pow (sin (* 1/90 (* 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 x-scale 2) (pow y-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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))))))
(* (pow b 4) (- (+ (* -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)))) (* 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)) (+.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 (*.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)))) (*.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 x-scale x-scale) (*.f64 y-scale y-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) (pow y-scale 2))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (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 (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)) (+.f64 (-.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 (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 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) b)) b)) (*.f64 #s(literal -4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(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) (- (+ (* -1 (/ (+ (* -1 (/ (- (+ (* -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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (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 (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)) (+.f64 (-.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 (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 y-scale y-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 (*.f64 b (*.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 (*.f64 a a) #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)))) (neg.f64 b))) b)) (*.f64 #s(literal -4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(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) (pow (sin (* 1/90 (* 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 (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 #s(literal -4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.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)))))))
(- (+ (/ (* 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) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-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 (*.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 #s(literal -4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.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))))))))
(- (+ (* a (+ (* a (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (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) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-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 (*.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))) (*.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 #s(literal -4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.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))))))))
(- (+ (* a (+ (* a (- (+ (/ (* 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (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) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-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 (*.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 (*.f64 b b) #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)))) (*.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 #s(literal -4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.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))))))))
(* (pow a 4) (- (/ (pow (sin (* 1/90 (* 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 x-scale 2) (pow y-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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))))))
(* (pow a 4) (- (+ (/ (* (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)))) (* 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)) (+.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 (*.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)))) (*.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 x-scale x-scale) (*.f64 y-scale y-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 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))))) (+ (* 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 (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)))) (*.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 (*.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) (- (+ (/ (* (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)))))) (+ (* 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 (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))))) (*.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 (*.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) (- (/ (pow (sin (* 1/90 (* 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 x-scale 2) (pow y-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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))))))
(* (pow a 4) (- (+ (* -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)))) (* 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)) (+.f64 (-.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 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))))) (*.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 x-scale x-scale) (*.f64 y-scale y-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) (pow y-scale 2))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (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 (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)) (+.f64 (-.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 (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 (*.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))) a)) a)) (*.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 x-scale x-scale) (*.f64 y-scale y-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 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (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 (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)) (+.f64 (-.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 (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)))) (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 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)))) a)) a)) (*.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 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) (* (pow (+ a b) 2) (pow (- b 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 -4 binary64) (fma.f64 (*.f64 b b) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale 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 (*.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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b 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))) (* (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) (PI.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 angle angle) (fma.f64 #s(literal -1/196830000 binary64) (/.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))) (*.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 (*.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 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 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 (*.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 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.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 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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) (- (/ (* (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 (+ (/ (* (+ (* -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) (PI.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 angle angle) (fma.f64 #s(literal -1/196830000 binary64) (/.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))) (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 (*.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 (*.f64 b b) #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) #s(literal -1/32400 binary64)))) (/.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 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.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 (*.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 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 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 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 (*.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 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.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 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 (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) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(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 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) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(- (/ (* (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) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(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 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) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(- (/ (* (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) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(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 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) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(- (/ (* (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) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(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 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) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(- (/ (* (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) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(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 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) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(- (/ (* (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) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(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 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) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(- (/ (* (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) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(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 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) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(- (/ (* (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) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(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 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) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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))
(/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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))
(/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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))
(/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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))
(/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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))
(/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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))
(/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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))
(/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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))
(/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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))
(/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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))
(/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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))
(/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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))
(/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.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 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)
(* -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 a a) (*.f64 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 a a) (*.f64 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 a a) (*.f64 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 a a) (*.f64 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 a a) (*.f64 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 a a) (*.f64 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 #s(literal 1/90 binary64) (/.f64 (*.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 #s(literal 2 binary64) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.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 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.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 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.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 (cos.f64 (*.f64 #s(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))
(* 4 (/ (* (pow 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) (*.f64 (pow.f64 a #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 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 a a) (*.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 (pow.f64 a #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 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 -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 #s(literal 4 binary64) (*.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 (pow.f64 a #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 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 -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 #s(literal 4 binary64) (*.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 (pow.f64 a #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 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 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.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))))))
(* (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 #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 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 -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 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 (*.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 -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 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 (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.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))))))
(* (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 #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 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 -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 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 (*.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 -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 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 (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.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))))))
(+ (* -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 a a) (*.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 (pow.f64 b #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 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 (*.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 #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 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.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)))))))
(+ (* 4 (/ (* (pow b 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 (*.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 #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 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.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)))))))
(* 4 (/ (* (pow 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) (*.f64 (pow.f64 a #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 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 (*.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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)))))))
(* (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 -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 (/.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 (*.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 -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 (/.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 (*.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 #s(literal 4 binary64) (*.f64 (pow.f64 a #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 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 (*.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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)))))))
(* (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 -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 (/.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 (*.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 -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 (/.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 (*.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) (PI.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)))
(* (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 #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)) (/.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 (*.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 (* (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) (PI.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)))))
(* (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 angle angle) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 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 8 binary64)) #s(literal -1/347128758144000000000 binary64))) (*.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 #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 #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 (*.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)))
(* 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/32400 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 a #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(+ (* -1/16200 (/ (* (pow a 2) (* (pow b 2) (pow (PI) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* -1/16200 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 a #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* -1/16200 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 a #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (pow b 4) (+ (* -1/16200 (/ (* (pow a 2) (pow (PI) 2)) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/32400 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (pow b 4) (+ (* -1/16200 (/ (* (pow a 2) (pow (PI) 2)) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) #s(literal 1 binary64)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow b 4) (+ (* -1/16200 (/ (* (pow a 2) (pow (PI) 2)) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) #s(literal 1 binary64)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (pow b 4) (+ (* -1/16200 (/ (* (pow a 2) (pow (PI) 2)) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/32400 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (pow b 4) (+ (* -1/16200 (/ (* (pow a 2) (pow (PI) 2)) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) #s(literal 1 binary64)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow b 4) (+ (* -1/16200 (/ (* (pow a 2) (pow (PI) 2)) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) #s(literal 1 binary64)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(+ (* -1/16200 (/ (* (pow a 2) (* (pow b 2) (pow (PI) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* -1/16200 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 (*.f64 a a) (fma.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* -1/16200 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 (*.f64 a a) (fma.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 a #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* (pow a 4) (+ (* -1/16200 (/ (* (pow b 2) (pow (PI) 2)) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/32400 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (pow a 4) (+ (* -1/16200 (/ (* (pow b 2) (pow (PI) 2)) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 a #s(literal 4 binary64))) #s(literal 1 binary64)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow a 4) (+ (* -1/16200 (/ (* (pow b 2) (pow (PI) 2)) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 a #s(literal 4 binary64))) #s(literal 1 binary64)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 a #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* (pow a 4) (+ (* -1/16200 (/ (* (pow b 2) (pow (PI) 2)) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/32400 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (pow a 4) (+ (* -1/16200 (/ (* (pow b 2) (pow (PI) 2)) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 a #s(literal 4 binary64))) #s(literal 1 binary64)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow a 4) (+ (* -1/16200 (/ (* (pow b 2) (pow (PI) 2)) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 a #s(literal 4 binary64))) #s(literal 1 binary64)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 b b) (/.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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 b b) (/.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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 b b) (/.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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 b b) (/.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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 b b) (/.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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 b b) (/.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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 b b) (/.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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 b b) (/.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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 b b) (/.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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 b b) (/.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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 b b) (/.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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 b b) (/.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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 b b) (/.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 b b) (/.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 b b) (/.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 b b) (/.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 b b) (/.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 b b) (/.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 b b) (/.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 b b) (/.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 b b) (/.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 b b) (/.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 b b) (/.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 b b) (/.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale x-scale))) (*.f64 y-scale y-scale))
(* 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 (*.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))) (*.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/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 #s(literal 1/1574640000 binary64) (*.f64 (*.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 #s(literal -1/382637520000000 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/1574640000 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/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 #s(literal -1/3149280000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/32400 binary64))))
(* (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/180 (* angle (PI)))
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))
(*.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 angle angle) (*.f64 (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))))
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 #s(literal 1/25194240000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 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))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 -4 binary64) (fma.f64 (*.f64 b b) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.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 x-scale 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 (*.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) (PI.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 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 (*.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 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 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 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 (*.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 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.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 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) (PI.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 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 (*.f64 b b) #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) #s(literal -1/32400 binary64)))) (/.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 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.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 (*.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 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 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 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 (*.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 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.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 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 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.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 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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))
(* 1/180 (* angle (PI)))
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))
(*.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 angle angle) (*.f64 (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))))

rewrite351.0ms (0.2%)

Memory
21.7MiB live, 979.7MiB allocated
Rules
6 162×lower-*.f32
6 066×lower-*.f64
4 898×lower-fma.f32
4 884×lower-fma.f64
3 742×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01531312
02691193
19651033
085611028
Stop Event
iter limit
node limit
iter limit
Counts
29 → 702
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(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (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)))) (*.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))))))
(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)))) (*.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)))))
(*.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)))) (*.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 (*.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 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))
(/.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 (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))))
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (*.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
(pow.f64 b #s(literal 2 binary64))
(pow.f64 a #s(literal 2 binary64))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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)))
(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)))))
(sin.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 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 binary64))))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))) (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-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 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) 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 (neg.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 b (*.f64 a a))))) (neg.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-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 (*.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 (*.f64 a 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 b b) (*.f64 #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 b b)) (/.f64 (*.f64 a 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 #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) (*.f64 b (*.f64 b (*.f64 a a)))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-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 (*.f64 a a) x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 (*.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 (*.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 (*.f64 a a) x-scale)) (/.f64 #s(literal 1 binary64) (*.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 #s(literal -4 binary64) (*.f64 b b)))
(*.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 #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 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 b b) (*.f64 #s(literal -4 binary64) (*.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 (*.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)
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.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 (/.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 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(+.f64 (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.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 (/.f64 (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64)))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 angle angle)) (/.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 (fma.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 (*.f64 angle angle) (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64)))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -4 binary64) (*.f64 angle angle))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.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 (*.f64 x-scale (*.f64 y-scale y-scale))))))) (/.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.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 (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(fma.f64 angle (*.f64 angle (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.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)))))
(fma.f64 angle (*.f64 angle (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 angle angle)) (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.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 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.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 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.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 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.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 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.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 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.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 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.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 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.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 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.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)))))
(fma.f64 (*.f64 angle angle) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 angle angle)) (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 angle angle)) (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 angle angle)) (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/8100 binary64) (*.f64 angle angle)) (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 angle angle)) (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 angle angle) (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 angle angle)) (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.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 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 b (*.f64 a a)))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.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 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.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 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.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 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.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 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.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 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.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 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.f64 (*.f64 angle (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) angle (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.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 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.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 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.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 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.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 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.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 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.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 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.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 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.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 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.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 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.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 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.f64 (*.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) angle) angle (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 angle angle)) (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (*.f64 (*.f64 angle angle) #s(literal 1/8100 binary64)) (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 angle angle)) (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (*.f64 (*.f64 angle angle) (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 1/8100 binary64) (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 angle angle)) (/.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 (fma.f64 (/.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 (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (pow.f64 (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))) (fma.f64 (/.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 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.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 (*.f64 x-scale (*.f64 y-scale y-scale)))))) (-.f64 (pow.f64 (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(/.f64 (fma.f64 (/.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 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 3 binary64))) (fma.f64 (/.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 (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (pow.f64 (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (/.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 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (-.f64 (pow.f64 (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 angle angle) (/.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 (pow.f64 (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.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 (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(/.f64 (neg.f64 (fma.f64 (/.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 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (/.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 (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (pow.f64 (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (neg.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.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 (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(/.f64 (-.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))) (-.f64 (/.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 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(*.f64 (fma.f64 (/.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 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.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 (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (pow.f64 (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))
(*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.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 (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(exp.f64 (*.f64 (log.f64 angle) #s(literal 2 binary64)))
(pow.f64 angle #s(literal 2 binary64))
(*.f64 angle angle)
(*.f64 (pow.f64 angle #s(literal 1 binary64)) (pow.f64 angle #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(+.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 -4 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(-.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64)))))))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (/.f64 (pow.f64 (*.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))))
(fma.f64 b (*.f64 (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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)))) #s(literal -4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (*.f64 b b) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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)))) #s(literal -4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 1/8100 binary64)) (*.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 1/8100 binary64)) (*.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.f64 (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 1/8100 binary64) (*.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.f64 (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 b #s(literal -4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -4 binary64) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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)))) #s(literal -4 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale) (*.f64 (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale y-scale))) #s(literal 1/8100 binary64)) (*.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #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) x-scale) (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #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 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64)))))) x-scale) (*.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #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 x-scale x-scale)) (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #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 (+.f64 b a) (-.f64 b a))) (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #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 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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))))) b (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (-.f64 (*.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64)))))))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -64 binary64) (pow.f64 (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.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 1/8100 binary64) (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64)))))))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal -64 binary64) (pow.f64 (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (-.f64 (*.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64)))))))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(/.f64 (fma.f64 #s(literal -64 binary64) (pow.f64 (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64)))))))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(/.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64)))))))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(/.f64 (neg.f64 (fma.f64 #s(literal -64 binary64) (pow.f64 (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (-.f64 (*.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64)))))))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64)))))))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64)))))))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (-.f64 (*.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (fma.f64 #s(literal -64 binary64) (pow.f64 (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.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) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (-.f64 (*.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64)))))))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(*.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64)))))))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 #s(literal -4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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) (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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) (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (neg.f64 (*.f64 x-scale (neg.f64 y-scale))))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (fma.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 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) x-scale))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) x-scale) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale x-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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) (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) x-scale)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale x-scale)) y-scale)
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale)) x-scale)
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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) #s(literal 1 binary64)) (*.f64 x-scale (/.f64 y-scale (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))
(/.f64 (*.f64 #s(literal 1 binary64) (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (/.f64 x-scale (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (fma.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 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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) (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale y-scale))
(/.f64 (neg.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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) (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (neg.f64 (*.f64 x-scale (neg.f64 y-scale))))
(/.f64 (neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale x-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (fma.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 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) y-scale)
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (fma.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)) #s(literal 1 binary64)) (/.f64 y-scale (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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) (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) #s(literal 1 binary64)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (fma.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)) (neg.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 y-scale))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (fma.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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))) x-scale)
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))) (/.f64 x-scale (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (fma.f64 #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 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (fma.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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))) (neg.f64 x-scale))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))) x-scale)
(/.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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) (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) y-scale) x-scale)
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) x-scale) #s(literal -1 binary64))
(*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (fma.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 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale)))
(*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))))
(*.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (fma.f64 #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 binary64) x-scale) (/.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)))
(*.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 #s(literal 1 binary64) (*.f64 x-scale y-scale))))
(*.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 x-scale y-scale)))
(*.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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) (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (fma.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 #s(literal 4 binary64) (/.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale)))
(*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (fma.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 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (fma.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 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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) (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (neg.f64 y-scale))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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) (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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) y-scale) (/.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) x-scale))
(*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) x-scale) (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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) y-scale))
(*.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (fma.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 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) y-scale))
(/.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 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(*.f64 angle (*.f64 (*.f64 (PI.f64) #s(literal 1/180 binary64)) #s(literal 2 binary64)))
(*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))
(*.f64 #s(literal 1/180 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64)))
(*.f64 (*.f64 angle #s(literal 1/180 binary64)) (*.f64 (PI.f64) #s(literal 2 binary64)))
(*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 2 binary64))
(*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))
(*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))
(*.f64 (*.f64 #s(literal 2 binary64) angle) (*.f64 (PI.f64) #s(literal 1/180 binary64)))
(*.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 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(-.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))))) y-scale))
(-.f64 (/.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)))) (/.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)))))
(-.f64 (/.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))))
(fma.f64 #s(literal 4 binary64) (neg.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 #s(literal 1 binary64) y-scale) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (fma.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.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (fma.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)) (neg.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (/.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (neg.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 y-scale y-scale))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 #s(literal -1 binary64) (/.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 y-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (fma.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 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (neg.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (fma.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.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(neg.f64 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))))) y-scale))
(/.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))))) (neg.f64 y-scale))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64))) (-.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (-.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale))))) y-scale)
(/.f64 (-.f64 (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 3 binary64))) (*.f64 (neg.f64 y-scale) (fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) (*.f64 (neg.f64 y-scale) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))
(/.f64 (-.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) y-scale)
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 2 binary64)) y-scale) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) y-scale))
(/.f64 (-.f64 y-scale (*.f64 (/.f64 (*.f64 y-scale y-scale) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))) (*.f64 (/.f64 (*.f64 y-scale y-scale) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 2 binary64))) y-scale))
(/.f64 (-.f64 (*.f64 (neg.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 2 binary64))) y-scale) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) y-scale))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale) (*.f64 y-scale (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))) (*.f64 y-scale y-scale))
(/.f64 (-.f64 (*.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (*.f64 (neg.f64 y-scale) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))))) (*.f64 (neg.f64 y-scale) (neg.f64 y-scale)))
(/.f64 (*.f64 (-.f64 (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 3 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) (neg.f64 y-scale)))
(/.f64 (*.f64 (-.f64 (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 y-scale)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (-.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(/.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 1 binary64)) (neg.f64 y-scale))
(/.f64 (*.f64 (-.f64 (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 3 binary64))) (/.f64 #s(literal -1 binary64) y-scale)) (fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) y-scale)) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal -1 binary64)) y-scale)
(pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))))) (/.f64 #s(literal -1 binary64) y-scale))
(*.f64 #s(literal 1 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))
(*.f64 (+.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale))))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)))))
(*.f64 (/.f64 #s(literal -1 binary64) y-scale) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))))) y-scale))
(*.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))))
(+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(+.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(+.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 0 binary64)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(-.f64 #s(literal 0 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale))))))
(-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(-.f64 (/.f64 (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 3 binary64)) (fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 3 binary64)) (fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))) (/.f64 (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))))
(fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (fma.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 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale)) (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (fma.f64 #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 binary64) x-scale) (/.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 #s(literal 1 binary64) (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 x-scale y-scale)) (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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) (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(fma.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(fma.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(fma.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #s(literal -1 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(fma.f64 (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (fma.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 #s(literal 4 binary64) (/.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale)) (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (fma.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)) (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (fma.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 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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) (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (neg.f64 y-scale))) (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (neg.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(fma.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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) (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) y-scale) (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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) (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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) y-scale) (/.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) x-scale) (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) x-scale) (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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) y-scale) (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (fma.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 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) y-scale) (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(neg.f64 (+.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (-.f64 (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (neg.f64 y-scale))) (*.f64 (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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) (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 x-scale (neg.f64 y-scale))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (*.f64 (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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) (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 x-scale y-scale)))
(/.f64 (-.f64 (*.f64 (neg.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64))) (*.f64 x-scale (neg.f64 y-scale))) (*.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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) (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 x-scale (neg.f64 y-scale))))
(/.f64 (-.f64 (*.f64 (neg.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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) (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (+.f64 (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))) #s(literal 3 binary64))) (+.f64 (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))))))
(*.f64 (-.f64 (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))))
(*.f64 #s(literal -1 binary64) (-.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (-.f64 (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))))
(neg.f64 (/.f64 (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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) (neg.f64 x-scale)))
(neg.f64 (/.f64 (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 x-scale)) x-scale))
(/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (fma.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 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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) x-scale)
(/.f64 (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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) (neg.f64 (neg.f64 x-scale)))
(/.f64 #s(literal 1 binary64) (*.f64 x-scale (/.f64 x-scale (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (fma.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 binary64) (/.f64 (*.f64 x-scale x-scale) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (fma.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 binary64) (/.f64 (*.f64 x-scale (/.f64 x-scale (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 1 binary64)))
(/.f64 (neg.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (fma.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 (neg.f64 x-scale)))
(/.f64 (neg.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 x-scale x-scale)))
(/.f64 (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 x-scale)) (neg.f64 x-scale))
(/.f64 (+.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 6 binary64)) (pow.f64 (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 6 binary64))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 (*.f64 b (*.f64 b (fma.f64 #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 (*.f64 b (fma.f64 #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 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)))))
(/.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 x-scale (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (fma.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 binary64) (neg.f64 (*.f64 x-scale (/.f64 x-scale (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (fma.f64 #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 (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 b b)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 1 binary64)) (*.f64 x-scale x-scale))
(/.f64 (*.f64 (neg.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 1 binary64)) (*.f64 (neg.f64 x-scale) x-scale))
(/.f64 (*.f64 (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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) #s(literal 1 binary64)) x-scale)
(pow.f64 (*.f64 x-scale (/.f64 x-scale (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 -1 binary64))
(*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (fma.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 binary64) (*.f64 x-scale x-scale)))
(*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (fma.f64 #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 binary64) x-scale) (/.f64 #s(literal 1 binary64) x-scale)))
(*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (fma.f64 #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 binary64) x-scale) x-scale))
(*.f64 (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 #s(literal 1 binary64) x-scale))
(*.f64 #s(literal 1 binary64) (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (fma.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 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 x-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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))
(neg.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (neg.f64 y-scale)))
(neg.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 y-scale)) y-scale))
(/.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))
(/.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) y-scale)
(/.f64 #s(literal 1 binary64) (*.f64 y-scale (/.f64 y-scale (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale y-scale) (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (/.f64 y-scale (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))
(/.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 y-scale)) (neg.f64 y-scale))
(/.f64 (neg.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 6 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 6 binary64))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 a (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)))))
(/.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 y-scale (/.f64 y-scale (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 a (*.f64 a (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 b b)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (neg.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) #s(literal 1 binary64)) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) #s(literal 1 binary64)) y-scale)
(/.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 y-scale)) #s(literal -1 binary64)) y-scale)
(pow.f64 (*.f64 y-scale (/.f64 y-scale (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) #s(literal -1 binary64))
(*.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))
(*.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 #s(literal 1 binary64) y-scale)))
(*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 #s(literal 1 binary64) (/.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 y-scale)) (/.f64 #s(literal -1 binary64) y-scale))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale))
(+.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(-.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))))) y-scale))
(-.f64 (/.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)))) (/.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)))))
(-.f64 (/.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))))
(fma.f64 #s(literal 4 binary64) (neg.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 #s(literal 1 binary64) y-scale) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (fma.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.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (fma.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)) (neg.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (/.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (neg.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 y-scale y-scale))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 #s(literal -1 binary64) (/.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 y-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (fma.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 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (neg.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (fma.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.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(neg.f64 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))))) y-scale))
(/.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))))) (neg.f64 y-scale))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64))) (-.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (-.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale))))) y-scale)
(/.f64 (-.f64 (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 3 binary64))) (*.f64 (neg.f64 y-scale) (fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) (*.f64 (neg.f64 y-scale) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))
(/.f64 (-.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) y-scale)
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 2 binary64)) y-scale) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) y-scale))
(/.f64 (-.f64 y-scale (*.f64 (/.f64 (*.f64 y-scale y-scale) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))) (*.f64 (/.f64 (*.f64 y-scale y-scale) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 2 binary64))) y-scale))
(/.f64 (-.f64 (*.f64 (neg.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 2 binary64))) y-scale) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) y-scale))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale) (*.f64 y-scale (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))) (*.f64 y-scale y-scale))
(/.f64 (-.f64 (*.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (*.f64 (neg.f64 y-scale) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))))) (*.f64 (neg.f64 y-scale) (neg.f64 y-scale)))
(/.f64 (*.f64 (-.f64 (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 3 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) (neg.f64 y-scale)))
(/.f64 (*.f64 (-.f64 (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 y-scale)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (-.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(/.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 1 binary64)) (neg.f64 y-scale))
(/.f64 (*.f64 (-.f64 (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 3 binary64))) (/.f64 #s(literal -1 binary64) y-scale)) (fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) y-scale)) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal -1 binary64)) y-scale)
(pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))))) (/.f64 #s(literal -1 binary64) y-scale))
(*.f64 #s(literal 1 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))
(*.f64 (+.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale))))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)))))
(*.f64 (/.f64 #s(literal -1 binary64) y-scale) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))))) y-scale))
(*.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 b (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 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 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)))
(neg.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (neg.f64 y-scale)))
(neg.f64 (/.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale))) y-scale))
(/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) y-scale)
(/.f64 #s(literal 1 binary64) (*.f64 y-scale (/.f64 x-scale (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 x-scale (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) y-scale))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal 1 binary64)))
(/.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (neg.f64 (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 x-scale (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))
(/.f64 (*.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 1 binary64)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (neg.f64 (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 1 binary64)) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 1 binary64)) y-scale)
(/.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) y-scale) x-scale)
(/.f64 (*.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 #s(literal 1 binary64) y-scale)) x-scale)
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (neg.f64 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 #s(literal 1 binary64) y-scale)) (neg.f64 x-scale))
(/.f64 (/.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale))) #s(literal -1 binary64)) y-scale)
(pow.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal -1 binary64))
(*.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 #s(literal 1 binary64) y-scale)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (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 b a) (-.f64 b a))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.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 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) 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 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) y-scale))
(*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)))
(*.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale))) (/.f64 #s(literal -1 binary64) y-scale))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)))
(*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) y-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))
(*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) x-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) x-scale))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale))) #s(literal 2 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 y-scale)) (/.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 y-scale)))
(neg.f64 (/.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 y-scale)))
(neg.f64 (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) y-scale))
(neg.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))
(neg.f64 (/.f64 (neg.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (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 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 (neg.f64 y-scale) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale)
(/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (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 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (*.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) y-scale))
(/.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) (*.f64 y-scale (/.f64 x-scale (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 y-scale) (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 y-scale y-scale) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 2 binary64))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64))) (*.f64 (neg.f64 y-scale) (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 2 binary64))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 y-scale y-scale) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 2 binary64)))))
(/.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (*.f64 y-scale (/.f64 x-scale (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))
(/.f64 (*.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)))) (*.f64 (*.f64 x-scale y-scale) (neg.f64 y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)))) (*.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (neg.f64 y-scale)))
(/.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 y-scale (/.f64 x-scale (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))
(/.f64 (*.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale))) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (neg.f64 y-scale) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale))) #s(literal 1 binary64)) (*.f64 (neg.f64 y-scale) (*.f64 y-scale (/.f64 x-scale (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))
(/.f64 (*.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale))) (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)))) (*.f64 (neg.f64 y-scale) (neg.f64 y-scale)))
(/.f64 (neg.f64 (neg.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 2 binary64)))) (neg.f64 (neg.f64 (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 x-scale (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))
(/.f64 (*.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)))) (neg.f64 y-scale))
(/.f64 (*.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale))) (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale))) (neg.f64 y-scale))
(/.f64 (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -1 binary64)) y-scale)
(pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))
(pow.f64 (/.f64 (*.f64 y-scale y-scale) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 2 binary64))) #s(literal -1 binary64))
(*.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 #s(literal -1 binary64) y-scale))
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.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 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.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 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))
(*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (*.f64 y-scale y-scale)))
(*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (/.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) y-scale))
(*.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)))
(*.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(*.f64 (neg.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 y-scale y-scale))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 2 binary64)))
(*.f64 #s(literal -1 binary64) (/.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 y-scale)))
(*.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)))
(*.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)
(*.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 y-scale) (*.f64 x-scale y-scale))
(*.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) y-scale)
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.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 a (*.f64 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 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(-.f64 (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.f64 b (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 a (*.f64 a (/.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 a (*.f64 (*.f64 (*.f64 a (PI.f64)) (*.f64 (PI.f64) (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 a (/.f64 (*.f64 (*.f64 a (PI.f64)) (*.f64 (PI.f64) (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b b) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 a a) (/.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b b) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 b (*.f64 (PI.f64) (PI.f64))) (fma.f64 a (*.f64 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)))) b (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (fma.f64 b (*.f64 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 a (*.f64 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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.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 a (*.f64 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 (neg.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a)))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))))) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 (*.f64 a a) x-scale) (/.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 (*.f64 (PI.f64) (*.f64 (PI.f64) (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 a (*.f64 a (*.f64 (PI.f64) (PI.f64)))) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 a (*.f64 a (*.f64 (PI.f64) (PI.f64)))) (/.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 (*.f64 (PI.f64) (*.f64 (PI.f64) (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a a) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 a x-scale) (/.f64 (*.f64 (*.f64 a (PI.f64)) (*.f64 (PI.f64) (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 a (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a (PI.f64)) (*.f64 (PI.f64) (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))))) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 a (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a (PI.f64)) (*.f64 (PI.f64) (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 (*.f64 (PI.f64) (*.f64 (PI.f64) (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))))) x-scale) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 (*.f64 (PI.f64) (*.f64 (PI.f64) (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 (*.f64 a (*.f64 a (*.f64 (PI.f64) (PI.f64)))) x-scale) (/.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 (*.f64 a (*.f64 a (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 (*.f64 a (*.f64 a (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (/.f64 (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 a #s(literal -1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (*.f64 b b) (/.f64 (*.f64 (PI.f64) (PI.f64)) x-scale)) (/.f64 (fma.f64 a (*.f64 a #s(literal -1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.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 a (*.f64 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 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 (pow.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.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 a (*.f64 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 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 (pow.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.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 a (*.f64 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 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 (neg.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (neg.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(/.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.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 a (*.f64 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 (pow.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.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 a (*.f64 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 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 #s(literal 1 binary64) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 b (*.f64 b #s(literal -1/32400 binary64)) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64))) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))
(*.f64 (*.f64 #s(literal 2 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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)) (neg.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 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 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 (*.f64 angle (PI.f64)) #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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (-.f64 (*.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 1/4 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (exp.f64 (log.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (exp.f64 (log.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (+.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1 binary64)) #s(literal 1/2 binary64) (neg.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 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)) (neg.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 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)) #s(literal 1/4 binary64)) (neg.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/.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 3 binary64)) (pow.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 (*.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)) (fma.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 (*.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 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))
(+.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))
(-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 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)) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 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)) #s(literal 1/4 binary64))))
(-.f64 (/.f64 #s(literal 1/4 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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 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))))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #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 (*.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))
(fma.f64 (neg.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #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 (*.f64 angle (PI.f64)) #s(literal 1/90 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)) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 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)) #s(literal 1/4 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 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 (cos.f64 (-.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (cos.f64 (fma.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 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)) #s(literal 1/4 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 #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/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (*.f64 (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 #s(literal 1/4 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))
(pow.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64))
(*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(*.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 (*.f64 angle (PI.f64)) #s(literal 1/90 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)) #s(literal 1/4 binary64))))
(*.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 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 (exp.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (exp.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (-.f64 (*.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 1/4 binary64)))
(*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)))) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1 binary64)))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 1 binary64))
(*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1 binary64)))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 1 binary64))
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64)))
(+.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (neg.f64 #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b)))))))))
(+.f64 (neg.f64 #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b)))))))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(-.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b))))))))
(-.f64 (/.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (fma.f64 #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b))))))) (+.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b)))))))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)))) (/.f64 (pow.f64 #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b))))))) #s(literal 3 binary64)) (fma.f64 #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b))))))) (+.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b)))))))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)))))
(-.f64 (/.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (+.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b))))))))) (/.f64 (pow.f64 #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b))))))) #s(literal 2 binary64)) (+.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b))))))))))
(fma.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale) (neg.f64 #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b)))))))))
(fma.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 #s(literal -1 binary64) y-scale) (neg.f64 #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b)))))))))
(fma.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (neg.f64 #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b)))))))))
(fma.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.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)) (neg.f64 #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b)))))))))
(fma.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.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)) (neg.f64 #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b)))))))))
(fma.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale))) (neg.f64 #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b)))))))))
(fma.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (neg.f64 #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b)))))))))
(fma.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (*.f64 y-scale y-scale)) (neg.f64 #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b)))))))))
(fma.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (/.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) y-scale) (neg.f64 #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b)))))))))
(fma.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) (neg.f64 #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b)))))))))
(fma.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (neg.f64 #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b)))))))))
(fma.f64 (neg.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 y-scale y-scale))) (neg.f64 #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b)))))))))
(fma.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 2 binary64)) (neg.f64 #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b)))))))))
(fma.f64 #s(literal -1 binary64) #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b))))))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 #s(literal -1 binary64) (/.f64 (/.f64 (pow.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 y-scale)) (neg.f64 #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b)))))))))
(fma.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (neg.f64 #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b))))))) (+.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b)))))))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64))) (-.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b))))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b)))))))) (-.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b))))))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b))))))) #s(literal 3 binary64))) (fma.f64 #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b))))))) (+.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b)))))))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b))))))) #s(literal 2 binary64))) (+.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b)))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b))))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b))))))) (+.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b)))))))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b))))))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b))))))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (neg.f64 #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b)))))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (-.f64 (*.f64 (neg.f64 #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b)))))))) (neg.f64 #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b))))))))) (*.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (neg.f64 #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b))))))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (*.f64 (neg.f64 #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b)))))))) (neg.f64 #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b)))))))))) (-.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (neg.f64 #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b))))))))))
(*.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b))))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b))))))) (+.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b)))))))) (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)))))
(*.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b))))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (/.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) #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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #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 b (*.f64 b (*.f64 b b))))))))))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1 binary64)))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 1 binary64))
(*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64)))

eval461.0ms (0.3%)

Memory
29.8MiB live, 1 404.1MiB allocated
Compiler

Compiled 256 748 to 6 296 computations (97.5% saved)

prune4.4s (3.1%)

Memory
-30.3MiB live, 15 996.6MiB allocated
Pruning

21 alts after pruning (21 fresh and 0 done)

PrunedKeptTotal
New2 670182 688
Fresh26329
Picked505
Done000
Total2 701212 722
Accuracy
81.5%
Counts
2 722 → 21
Alt Table
Click to see full alt table
StatusAccuracyProgram
25.4%
(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%
(/.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))
22.2%
(/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale))
24.2%
(/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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))))) y-scale) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale)))) (*.f64 x-scale x-scale))) (neg.f64 y-scale))
54.9%
(/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 x-scale x-scale) y-scale))) (neg.f64 y-scale))
33.0%
(/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (-.f64 (fma.f64 b (fma.f64 b (fma.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)) 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)) y-scale))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (neg.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) y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 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 #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) y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 y-scale))
21.5%
(-.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 y-scale y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) #s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
27.9%
(-.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 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
63.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 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 x-scale y-scale)) y-scale))
60.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 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
59.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 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
59.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 y-scale) (*.f64 x-scale y-scale))))
59.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 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))
64.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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)))
64.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 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))))
57.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 a a) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale)))
47.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 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 y-scale y-scale))))
62.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 #s(literal -4 binary64) x-scale) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale)))))
63.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 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
62.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
23.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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))))
Compiler

Compiled 2 090 to 972 computations (53.5% saved)

simplify218.0ms (0.2%)

Memory
5.5MiB live, 560.9MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale))
cost-diff64
(/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)
cost-diff128
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))
cost-diff1024
(*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))
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))) 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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))))
cost-diff384
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))
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))) a)
cost-diff0
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
cost-diff0
(*.f64 angle angle)
cost-diff0
#s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))))
cost-diff640
(*.f64 (*.f64 angle angle) #s(literal 0 binary64))
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 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)))
cost-diff384
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))
Rules
7 306×lower-*.f32
7 264×lower-*.f64
5 006×lower-fma.f32
4 998×lower-fma.f64
3 556×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01621856
02161854
15821777
225591760
084081727
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 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 (*.f64 y-scale y-scale))) (/.f64 a x-scale))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 x-scale (*.f64 y-scale y-scale))
x-scale
(*.f64 y-scale y-scale)
y-scale
(/.f64 a 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))))
#s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64)))
(*.f64 (*.f64 angle angle) #s(literal 0 binary64))
(*.f64 angle angle)
angle
#s(literal 0 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 (*.f64 a (*.f64 #s(literal -4 binary64) (*.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 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a)
(*.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 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 #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))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-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)))
a
(*.f64 #s(literal -4 binary64) (*.f64 b b))
#s(literal -4 binary64)
(*.f64 b b)
b
x-scale
(/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))
(*.f64 x-scale (*.f64 y-scale y-scale))
(*.f64 y-scale y-scale)
y-scale
(/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale))
#s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)
(fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))))
#s(literal 4 binary64)
(/.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 (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)))))
(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))))
(*.f64 b 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)))
#s(literal 1/2 binary64)
(*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))
(*.f64 angle (PI.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 a a)
a
(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 b b) (fma.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)
x-scale
(*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))
(pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
#s(literal 2 binary64)
(neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))
(/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))
(*.f64 (+.f64 b a) (-.f64 b a))
(+.f64 b a)
(-.f64 b a)
y-scale
(neg.f64 y-scale)
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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a 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 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 x-scale (*.f64 y-scale y-scale))
x-scale
(*.f64 y-scale y-scale)
y-scale
(/.f64 a 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(literal 0 binary64)))
#s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64)))
#s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(literal 0 binary64))
(*.f64 (*.f64 angle angle) #s(literal 0 binary64))
#s(literal 0 binary64)
(*.f64 angle angle)
angle
#s(literal 0 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 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a)
(*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))
(*.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 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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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)))))
(*.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 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-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)))
a
(*.f64 #s(literal -4 binary64) (*.f64 b b))
#s(literal -4 binary64)
(*.f64 b b)
b
x-scale
(/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))
(*.f64 x-scale (*.f64 y-scale y-scale))
(*.f64 y-scale y-scale)
y-scale
(/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale))
(/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (-.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.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) (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 (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 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) #s(literal 2 binary64)) (*.f64 y-scale (*.f64 x-scale x-scale))))) (neg.f64 y-scale))
#s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale))
#s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (-.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.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) (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 (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 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) #s(literal 2 binary64)) (*.f64 y-scale (*.f64 x-scale x-scale)))))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)
(-.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.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) (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 (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 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) #s(literal 2 binary64)) (*.f64 y-scale (*.f64 x-scale x-scale))))
(fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))))
(fma.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.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) (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 (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)))) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) #s(literal 2 binary64)) (*.f64 x-scale (neg.f64 x-scale))))
#s(literal 4 binary64)
(/.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 (*.f64 (fma.f64 b (*.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) (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 (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))
(*.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 (fma.f64 b (*.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) (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 (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 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 b (*.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) (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 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)))
(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 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))
(*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))
(*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))
(*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))
(*.f64 angle (PI.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 (*.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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #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))
(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))))
(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))))
(*.f64 (*.f64 b b) (fma.f64 #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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))
(*.f64 x-scale 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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))
(/.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) #s(literal 2 binary64)) (*.f64 x-scale (neg.f64 x-scale)))
(pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))
(pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 2 binary64))
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))
#s(literal 2 binary64)
(neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))
(/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale (neg.f64 x-scale)))
(/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))
(*.f64 (+.f64 b a) (-.f64 b a))
(+.f64 b a)
(-.f64 b a)
y-scale
(neg.f64 y-scale)

localize1.1s (0.7%)

Memory
28.8MiB live, 3 223.4MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy16.301328747199953
(/.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))
accuracy25.097793945592322
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
accuracy25.170500080782936
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
accuracy27.195049179558893
(fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))))
accuracy5.132593733200631
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale)
accuracy6.645576649757153
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
accuracy7.663058141975956
(*.f64 x-scale (*.f64 y-scale y-scale))
accuracy9.648210004196226
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))
accuracy2.8356458421303765
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a)
accuracy6.645576649757153
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
accuracy7.663058141975956
(*.f64 x-scale (*.f64 y-scale y-scale))
accuracy13.037675849734558
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
accuracy0
(*.f64 angle angle)
accuracy0
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))))
accuracy14.519450064278036
(*.f64 (*.f64 angle angle) #s(literal 0 binary64))
accuracy36.14022767994715
#s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64)))
accuracy5.663254913631548
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))
accuracy6.645576649757153
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
accuracy7.663058141975956
(*.f64 x-scale (*.f64 y-scale y-scale))
accuracy11.25182110924097
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
Samples
517.0ms171×1valid
264.0ms59×2valid
24.0ms20×1exit
23.0ms3valid
19.0ms2exit
Compiler

Compiled 1 521 to 151 computations (90.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 764.0ms
ival-mult: 217.0ms (28.4% of total)
ival-cos: 119.0ms (15.6% of total)
ival-sin: 99.0ms (13% of total)
ival-div: 83.0ms (10.9% of total)
const: 72.0ms (9.4% of total)
adjust: 66.0ms (8.6% of total)
ival-add: 42.0ms (5.5% of total)
ival-pow2: 41.0ms (5.4% of total)
ival-sub: 14.0ms (1.8% of total)
ival-neg: 9.0ms (1.2% of total)
ival-pi: 2.0ms (0.3% of total)
exact: 1.0ms (0.1% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series271.0ms (0.2%)

Memory
-14.7MiB live, 828.2MiB allocated
Counts
23 → 924
Calls
Call 1
Inputs
#s(alt (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 (*.f64 angle angle) #s(literal 0 binary64)) (patch (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64)))) #<representation binary64>) () ())
#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 angle angle) (patch (*.f64 angle angle) #<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 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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))) a) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<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>) () ())
#s(alt (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())
#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #<representation binary64>) () ())
#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())
#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())
#s(alt (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (patch (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #<representation binary64>) () ())
#s(alt (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (patch (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #<representation binary64>) () ())
#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())
Outputs
#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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 0 (taylor 0 angle) (#s(alt (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) (patch (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 angle) (#s(alt (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) (patch (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 angle) (#s(alt (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) (patch (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 angle) (#s(alt (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) (patch (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf angle) (#s(alt (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) (patch (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf angle) (#s(alt (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) (patch (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf angle) (#s(alt (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) (patch (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf angle) (#s(alt (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) (patch (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf angle) (#s(alt (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) (patch (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf angle) (#s(alt (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) (patch (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf angle) (#s(alt (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) (patch (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf angle) (#s(alt (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) (patch (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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 (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<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) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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 #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<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) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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 #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<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) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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 #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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 inf angle) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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 inf angle) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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 inf angle) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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 inf angle) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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 -inf angle) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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 -inf angle) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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 -inf angle) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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 -inf angle) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor 0 b) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/8100 (/ (* (pow angle 2) (* b (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* b (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* b (+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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) (+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* b (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* b (+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow angle 2) (* b (* (pow (PI) 2) (+ (* -2 a) (* 2 a))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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) (+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (* (pow b 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (taylor inf b) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -4 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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)))))) (taylor inf b) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -4 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow b 3) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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))))))) (taylor inf b) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (* (pow b 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (taylor -inf b) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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))))))) b)) (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2))))) b)) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (taylor -inf b) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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)))))))) b)) (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2))))) b)) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (taylor -inf b) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor 0 a) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/8100 (/ (* a (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* a (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* a (+ (* -4 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* a (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* a (+ (* -4 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* a (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (taylor inf a) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -4 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow a 2)))))) (taylor inf a) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -4 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow a 3) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow a 2))))))) (taylor inf a) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (taylor -inf a) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) a)) (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2))))) a)) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (taylor -inf a) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) a)) (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2))))) a)) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (taylor -inf a) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 y-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 y-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 y-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 y-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow angle 2) (taylor 0 angle) (#s(alt (*.f64 angle angle) (patch (*.f64 angle angle) #<representation binary64>) () ())) ())
#s(alt (pow angle 2) (taylor 0 angle) (#s(alt (*.f64 angle angle) (patch (*.f64 angle angle) #<representation binary64>) () ())) ())
#s(alt (pow angle 2) (taylor 0 angle) (#s(alt (*.f64 angle angle) (patch (*.f64 angle angle) #<representation binary64>) () ())) ())
#s(alt (pow angle 2) (taylor 0 angle) (#s(alt (*.f64 angle angle) (patch (*.f64 angle angle) #<representation binary64>) () ())) ())
#s(alt (pow angle 2) (taylor inf angle) (#s(alt (*.f64 angle angle) (patch (*.f64 angle angle) #<representation binary64>) () ())) ())
#s(alt (pow angle 2) (taylor inf angle) (#s(alt (*.f64 angle angle) (patch (*.f64 angle angle) #<representation binary64>) () ())) ())
#s(alt (pow angle 2) (taylor inf angle) (#s(alt (*.f64 angle angle) (patch (*.f64 angle angle) #<representation binary64>) () ())) ())
#s(alt (pow angle 2) (taylor inf angle) (#s(alt (*.f64 angle angle) (patch (*.f64 angle angle) #<representation binary64>) () ())) ())
#s(alt (pow angle 2) (taylor -inf angle) (#s(alt (*.f64 angle angle) (patch (*.f64 angle angle) #<representation binary64>) () ())) ())
#s(alt (pow angle 2) (taylor -inf angle) (#s(alt (*.f64 angle angle) (patch (*.f64 angle angle) #<representation binary64>) () ())) ())
#s(alt (pow angle 2) (taylor -inf angle) (#s(alt (*.f64 angle angle) (patch (*.f64 angle angle) #<representation binary64>) () ())) ())
#s(alt (pow angle 2) (taylor -inf angle) (#s(alt (*.f64 angle angle) (patch (*.f64 angle angle) #<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 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) #<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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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))))) #<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>) () ())) ())
#s(alt (* -1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2))) (taylor 0 angle) (#s(alt (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.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))) (* 1/196830000 (/ (* (pow angle 2) (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2))))) (taylor 0 angle) (#s(alt (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.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 (/ (* (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))) (* 1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))))) (taylor 0 angle) (#s(alt (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.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) (+ (* -1 (/ (* (pow angle 2) (* (pow (+ a b) 2) (* (+ (* -1/1549681956000000000 (pow (PI) 8)) (* -1/10847773692000000000 (pow (PI) 8))) (pow (- b a) 2)))) (pow x-scale 2))) (* -1 (/ (* (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 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (taylor inf angle) (#s(alt (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (taylor inf angle) (#s(alt (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (taylor inf angle) (#s(alt (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (taylor inf angle) (#s(alt (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (taylor -inf angle) (#s(alt (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (taylor -inf angle) (#s(alt (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (taylor -inf angle) (#s(alt (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (taylor -inf angle) (#s(alt (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (taylor 0 b) (#s(alt (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow x-scale 2))) (* -1 (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* b (+ (* -1 (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow x-scale 2))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2)))))) (taylor 0 b) (#s(alt (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* b (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2))) (* b (+ (* -1 (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow x-scale 2))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))))))) (taylor 0 b) (#s(alt (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (taylor inf b) (#s(alt (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.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)))) (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))) (taylor inf b) (#s(alt (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2)))) (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))))) (taylor inf b) (#s(alt (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow b 3) (pow x-scale 2)))) (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))))) (taylor inf b) (#s(alt (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (taylor -inf b) (#s(alt (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2))))) (taylor -inf b) (#s(alt (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (* (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)))) (* b (pow x-scale 2)))) b)) (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))) (taylor -inf b) (#s(alt (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow x-scale 2))) (* -1 (/ (+ (* -1 (/ (* (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)))) (* b (pow x-scale 2)))) b))) b)) (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))) (taylor -inf b) (#s(alt (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (taylor 0 a) (#s(alt (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow x-scale 2))) (* -1 (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* a (+ (* -1 (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow x-scale 2))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2)))))) (taylor 0 a) (#s(alt (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* a (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2))) (* a (+ (* -1 (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow x-scale 2))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))))))) (taylor 0 a) (#s(alt (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (taylor inf a) (#s(alt (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.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)))) (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))) (taylor inf a) (#s(alt (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2)))) (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))))) (taylor inf a) (#s(alt (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow a 3) (pow x-scale 2)))) (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))))) (taylor inf a) (#s(alt (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (taylor -inf a) (#s(alt (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2))))) (taylor -inf a) (#s(alt (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (* (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)))) (* a (pow x-scale 2)))) a)) (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))) (taylor -inf a) (#s(alt (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow x-scale 2))) (* -1 (/ (+ (* -1 (/ (* (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)))) (* a (pow x-scale 2)))) a))) a)) (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))) (taylor -inf a) (#s(alt (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (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 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (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 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (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 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (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 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (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 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (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 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (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 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (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 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (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 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (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 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (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 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (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 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))) (patch (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.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 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 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 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 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 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 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 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (taylor inf angle) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (taylor inf angle) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (taylor inf angle) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (taylor inf angle) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (taylor -inf angle) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (taylor -inf angle) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (taylor -inf angle) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (taylor -inf angle) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (* (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)))) y-scale) (taylor 0 b) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) y-scale))) (+ (* -1 (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) 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) y-scale))))) (taylor 0 b) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) 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) y-scale))) (* b (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) y-scale))) (* b (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) y-scale))) (* 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))) y-scale)))))))) (taylor 0 b) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) 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) y-scale))) (* b (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) y-scale))) (* b (+ (* -1 (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) y-scale))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) y-scale))) (* 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))) y-scale))))))))) (taylor 0 b) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 4) (+ (* -1 (/ (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))))) y-scale) (taylor inf b) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-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) y-scale)))) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) (* 4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))))) (taylor inf b) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (* (pow x-scale 2) y-scale)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) y-scale)))) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 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) y-scale)))))))) (taylor inf b) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (* (pow x-scale 2) y-scale)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) y-scale)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow b 3) (* (pow x-scale 2) y-scale)))) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 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) y-scale))))))))) (taylor inf b) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 4) (+ (* -1 (/ (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))))) y-scale) (taylor -inf b) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) y-scale)))))) (taylor -inf b) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) y-scale))) (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) y-scale))) (* 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))) y-scale))) b))) b)) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) (* 4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))))) (taylor -inf b) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) y-scale))) (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) y-scale))) (+ (* 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))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* b (* (pow x-scale 2) y-scale))))) b))) b)) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) (* 4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))))) (taylor -inf b) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (taylor 0 angle) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) (* 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))) y-scale))))) (taylor 0 angle) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) (+ (* 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))) y-scale)) (* (pow angle 2) (+ (* 1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) (* 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)))) y-scale)))))))) (taylor 0 angle) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) (+ (* 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))) y-scale)) (* (pow angle 2) (+ (* 1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) (+ (* 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)))) y-scale)) (* (pow angle 2) (+ (* -1 (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) (* 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))))) y-scale))))))))))) (taylor 0 angle) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (* (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)))) y-scale) (taylor inf angle) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (* (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)))) y-scale) (taylor inf angle) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (* (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)))) y-scale) (taylor inf angle) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (* (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)))) y-scale) (taylor inf angle) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (* (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)))) y-scale) (taylor -inf angle) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (* (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)))) y-scale) (taylor -inf angle) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (* (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)))) y-scale) (taylor -inf angle) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (* (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)))) y-scale) (taylor -inf angle) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (* (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)))) y-scale) (taylor 0 a) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) y-scale))) (+ (* -1 (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) 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) y-scale))))) (taylor 0 a) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) 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) y-scale))) (* a (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) y-scale))) (* a (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) y-scale))) (* 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))) y-scale)))))))) (taylor 0 a) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) 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) y-scale))) (* a (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) y-scale))) (* a (+ (* -1 (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) y-scale))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) y-scale))) (* 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))) y-scale))))))))) (taylor 0 a) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 4) (+ (* -1 (/ (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))))) y-scale) (taylor inf a) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-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) y-scale)))) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) (* 4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))))) (taylor inf a) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (* (pow x-scale 2) y-scale)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) y-scale)))) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 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) y-scale)))))))) (taylor inf a) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (* (pow x-scale 2) y-scale)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) y-scale)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow a 3) (* (pow x-scale 2) y-scale)))) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 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) y-scale))))))))) (taylor inf a) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 4) (+ (* -1 (/ (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))))) y-scale) (taylor -inf a) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) y-scale)))))) (taylor -inf a) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) y-scale))) (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) y-scale))) (* 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))) y-scale))) a))) a)) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) (* 4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))))) (taylor -inf a) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) y-scale))) (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) y-scale))) (+ (* 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))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* a (* (pow x-scale 2) y-scale))))) a))) a)) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) (* 4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))))) (taylor -inf a) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (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) y-scale)) (taylor 0 x-scale) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (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) y-scale)) (taylor 0 x-scale) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (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) y-scale)) (taylor 0 x-scale) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (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) y-scale)) (taylor 0 x-scale) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (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) y-scale)) (taylor inf x-scale) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (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) y-scale)) (taylor inf x-scale) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (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) y-scale)) (taylor inf x-scale) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (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) y-scale)) (taylor inf x-scale) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (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) y-scale)) (taylor -inf x-scale) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (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) y-scale)) (taylor -inf x-scale) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (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) y-scale)) (taylor -inf x-scale) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (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) y-scale)) (taylor -inf x-scale) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (* (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)))) y-scale) (taylor 0 y-scale) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (* (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)))) y-scale) (taylor 0 y-scale) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (* (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)))) y-scale) (taylor 0 y-scale) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (* (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)))) y-scale) (taylor 0 y-scale) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (* (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)))) y-scale) (taylor inf y-scale) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (* (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)))) y-scale) (taylor inf y-scale) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (* (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)))) y-scale) (taylor inf y-scale) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (* (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)))) y-scale) (taylor inf y-scale) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (* (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)))) y-scale) (taylor -inf y-scale) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (* (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)))) y-scale) (taylor -inf y-scale) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (* (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)))) y-scale) (taylor -inf y-scale) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (* (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)))) y-scale) (taylor -inf y-scale) (#s(alt (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) (patch (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 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) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (taylor 0 b) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (- (* 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) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (- (* 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) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (* b (+ (* -1 (* b (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (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)))))) (taylor 0 b) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (- (* 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) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (* b (+ (* b (+ (* -1 (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor 0 b) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (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) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) y-scale)) (taylor inf b) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))))) (taylor inf b) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (+ (* -1 (/ (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (+ (* -1 (/ (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 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)))))))) (taylor inf b) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (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) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) y-scale)) (taylor -inf b) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-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 y-scale 2))))) (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)))) (taylor -inf b) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (* -1 (/ (- (+ (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (* b y-scale))) (/ (* (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)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) b)))) (taylor -inf b) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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)))))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2)))) b)) (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)))) (taylor -inf b) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 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) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (taylor 0 a) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (- (* 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) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (- (* 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) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (* a (+ (* -1 (* a (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (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)))))) (taylor 0 a) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (- (* 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) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (* a (+ (* a (+ (* -1 (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor 0 a) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (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) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) y-scale)) (taylor inf a) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))))) (taylor inf a) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (+ (* -1 (/ (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (+ (* -1 (/ (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 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)))))))) (taylor inf a) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (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) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) y-scale)) (taylor -inf a) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-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 y-scale 2))))) (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)))) (taylor -inf a) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (* -1 (/ (- (+ (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (* a y-scale))) (/ (* (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)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) a)))) (taylor -inf a) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 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)))))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2)))) a)) (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)))) (taylor -inf a) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 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 (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1 (* (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) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale))) y-scale)) (* 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 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1 (* (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) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)))) y-scale)) (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (* -1 (- (* 4 (/ (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale))) y-scale)) (* 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 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1 (- (* 4 (/ (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale))) y-scale)) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (+ (* -1 (* (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) 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))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale))))) y-scale)) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (* -1 (- (* 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) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)))) y-scale)) (* -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 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale)) (taylor inf angle) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale)) (taylor inf angle) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale)) (taylor inf angle) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale)) (taylor inf angle) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale)) (taylor -inf angle) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale)) (taylor -inf angle) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale)) (taylor -inf angle) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale)) (taylor -inf angle) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale))) (taylor inf x-scale) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale))) (taylor inf x-scale) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale))) (taylor inf x-scale) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale))) (taylor inf x-scale) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 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))) (* -1 (/ (* (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 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 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))) (* -1 (/ (* (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 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 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))) (* -1 (/ (* (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 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 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))) (* -1 (/ (* (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 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)) (patch (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 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 (+ (* -1 (/ (* (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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow x-scale 2))) (+ (* -1 (/ (* (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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (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 (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2))) (* b (+ (* -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)))))))))) (taylor 0 b) (#s(alt (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (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 (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2))) (* b (+ (* -1 (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow x-scale 2))) (+ (* -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))))))))))) (taylor 0 b) (#s(alt (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.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)))) (+ (* -1 (/ (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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2)))) (+ (* -1 (/ (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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow b 3) (pow x-scale 2)))) (+ (* -1 (/ (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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (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 (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2)))))) (taylor -inf b) (#s(alt (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow x-scale 2))) (* -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))) b)) (+ (* -1 (/ (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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow x-scale 2))) (* -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)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* b (pow x-scale 2))))) b))) b)) (+ (* -1 (/ (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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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))))))) (taylor 0 angle) (#s(alt (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (* (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))))))))))) (taylor 0 angle) (#s(alt (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (* (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))))) (* (pow angle 2) (+ (* -1 (/ (* (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))))))))))))))) (taylor 0 angle) (#s(alt (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow x-scale 2))) (+ (* -1 (/ (* (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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (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 (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2))) (* a (+ (* -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)))))))))) (taylor 0 a) (#s(alt (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (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 (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2))) (* a (+ (* -1 (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow x-scale 2))) (+ (* -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))))))))))) (taylor 0 a) (#s(alt (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.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)))) (+ (* -1 (/ (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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2)))) (+ (* -1 (/ (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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow a 3) (pow x-scale 2)))) (+ (* -1 (/ (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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (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 (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2)))))) (taylor -inf a) (#s(alt (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow x-scale 2))) (* -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))) a)) (+ (* -1 (/ (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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow x-scale 2))) (* -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)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* a (pow x-scale 2))))) a))) a)) (+ (* -1 (/ (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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (patch (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (patch (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* -1/4374000 (* (pow angle 2) (pow (PI) 3))) (* 1/90 (PI)))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (patch (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #<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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (patch (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #<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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (patch (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (patch (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (patch (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (patch (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (patch (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (patch (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (patch (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (patch (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (patch (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 angle) (#s(alt (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (patch (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/16200 (* (pow angle 2) (pow (PI) 2)))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (patch (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* 1/1574640000 (* (pow angle 2) (pow (PI) 4)))))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (patch (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/382637520000000 (* (pow angle 2) (pow (PI) 6))) (* 1/1574640000 (pow (PI) 4))))))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (patch (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (patch (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (patch (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (patch (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (patch (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (patch (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (patch (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (patch (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (patch (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 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)))))))) (pow x-scale 2)) (taylor 0 b) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow b 2) (+ (/ (* (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 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 (*.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow b 2) (+ (/ (* (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) (* (+ 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/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 (*.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow b 2) (+ (/ (* (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) (* (+ 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/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 (*.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)) (patch (/.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)) #<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)))))))) (pow x-scale 2)) (taylor inf b) (#s(alt (/.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)) (patch (/.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)) #<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))))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow x-scale 2)))))) (taylor inf b) (#s(alt (/.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)) (patch (/.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)) #<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))))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (* (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))))))) (taylor inf b) (#s(alt (/.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)) (patch (/.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)) #<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))))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (* (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))))))) (taylor inf b) (#s(alt (/.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)) (patch (/.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)) #<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)))))))) (pow x-scale 2)) (taylor -inf b) (#s(alt (/.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)) (patch (/.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)) #<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))))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow x-scale 2)))))) (taylor -inf b) (#s(alt (/.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)) (patch (/.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)) #<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))))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (* (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))))))) (taylor -inf b) (#s(alt (/.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)) (patch (/.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)) #<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))))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (* (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))))))) (taylor -inf b) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)) (taylor 0 angle) (#s(alt (/.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)) (patch (/.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)) #<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))))) (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 a 2) (pow b 2)) (pow x-scale 2))) (taylor 0 angle) (#s(alt (/.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)) (patch (/.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)) #<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))))) (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 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 a 2) (pow b 2)) (pow x-scale 2))) (taylor 0 angle) (#s(alt (/.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)) (patch (/.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)) #<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))))) (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)))))) (+ (/ (* (+ (* -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 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 a 2) (pow b 2)) (pow x-scale 2))) (taylor 0 angle) (#s(alt (/.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)) (patch (/.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)) #<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))))))))) (pow x-scale 2)) (taylor inf angle) (#s(alt (/.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)) (patch (/.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)) #<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))))))))) (pow x-scale 2)) (taylor inf angle) (#s(alt (/.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)) (patch (/.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)) #<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))))))))) (pow x-scale 2)) (taylor inf angle) (#s(alt (/.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)) (patch (/.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)) #<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))))))))) (pow x-scale 2)) (taylor inf angle) (#s(alt (/.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)) (patch (/.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)) #<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))))))))) (pow x-scale 2)) (taylor -inf angle) (#s(alt (/.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)) (patch (/.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)) #<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))))))))) (pow x-scale 2)) (taylor -inf angle) (#s(alt (/.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)) (patch (/.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)) #<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))))))))) (pow x-scale 2)) (taylor -inf angle) (#s(alt (/.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)) (patch (/.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)) #<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))))))))) (pow x-scale 2)) (taylor -inf angle) (#s(alt (/.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)) (patch (/.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)) #<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)))))))) (pow x-scale 2)) (taylor 0 a) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a 2) (+ (/ (* (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 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 (*.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)) (patch (/.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)) #<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)))))))) (pow x-scale 2)) (+ (/ (* (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 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 (*.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)) (patch (/.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)) #<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)))))))) (pow x-scale 2)) (+ (/ (* (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 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 (*.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)) (patch (/.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)) #<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)))))))) (pow x-scale 2)) (taylor inf a) (#s(alt (/.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)) (patch (/.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)) #<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))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow x-scale 2)))))) (taylor inf a) (#s(alt (/.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)) (patch (/.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)) #<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))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow x-scale 2))) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (* (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))))))) (taylor inf a) (#s(alt (/.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)) (patch (/.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)) #<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))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow x-scale 2))) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (* (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))))))) (taylor inf a) (#s(alt (/.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)) (patch (/.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)) #<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)))))))) (pow x-scale 2)) (taylor -inf a) (#s(alt (/.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)) (patch (/.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)) #<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))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow x-scale 2)))))) (taylor -inf a) (#s(alt (/.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)) (patch (/.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)) #<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))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow x-scale 2))) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (* (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))))))) (taylor -inf a) (#s(alt (/.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)) (patch (/.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)) #<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))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow x-scale 2))) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (* (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))))))) (taylor -inf a) (#s(alt (/.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)) (patch (/.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)) #<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))))))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (/.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)) (patch (/.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)) #<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))))))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (/.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)) (patch (/.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)) #<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))))))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (/.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)) (patch (/.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)) #<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))))))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (/.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)) (patch (/.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)) #<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))))))))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (/.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)) (patch (/.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)) #<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))))))))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (/.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)) (patch (/.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)) #<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))))))))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (/.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)) (patch (/.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)) #<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))))))))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (/.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)) (patch (/.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)) #<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))))))))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (/.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)) (patch (/.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)) #<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))))))))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (/.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)) (patch (/.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)) #<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))))))))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (/.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)) (patch (/.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)) #<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))))))))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
Calls

231 calls:

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

simplify488.0ms (0.3%)

Memory
1.6MiB live, 1 350.6MiB allocated
Algorithm
egg-herbie
Rules
7 336×lower-fma.f64
7 336×lower-fma.f32
5 594×lower-*.f64
5 594×lower-*.f32
5 196×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0136555891
1523253423
0847351460
Stop Event
iter limit
node limit
Counts
924 → 924
Calls
Call 1
Inputs
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 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 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (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)))
0
0
0
0
0
0
0
0
0
0
0
0
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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)))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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) (+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(+ (* 1/8100 (/ (* (pow angle 2) (* b (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(+ (* b (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* b (+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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) (+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(+ (* b (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* b (+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow angle 2) (* b (* (pow (PI) 2) (+ (* -2 a) (* 2 a))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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) (+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow angle 2) (* (pow b 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 4) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(* (pow b 4) (+ (* -4 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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))))))
(* (pow b 4) (+ (* -4 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow b 3) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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)))))))
(* (pow angle 2) (* (pow b 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 4) (+ (* -1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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))))))) b)) (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2))))) b)) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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)))))))) b)) (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2))))) b)) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(* (pow angle 2) (+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(+ (* 1/8100 (/ (* a (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(+ (* a (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* a (+ (* -4 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(+ (* a (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* a (+ (* -4 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* a (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 4) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 4) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(* (pow a 4) (+ (* -4 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow a 2))))))
(* (pow a 4) (+ (* -4 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow a 3) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow a 2)))))))
(* (pow a 4) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 4) (+ (* -1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) a)) (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2))))) a)) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) a)) (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2))))) a)) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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)
(pow angle 2)
(pow angle 2)
(pow angle 2)
(pow angle 2)
(pow angle 2)
(pow angle 2)
(pow angle 2)
(pow angle 2)
(pow angle 2)
(pow angle 2)
(pow angle 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 (* (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))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (/ (* 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))
(* -1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 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))) (* 1/196830000 (/ (* (pow angle 2) (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 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 (/ (* (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))) (* 1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 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) (+ (* -1 (/ (* (pow angle 2) (* (pow (+ a b) 2) (* (+ (* -1/1549681956000000000 (pow (PI) 8)) (* -1/10847773692000000000 (pow (PI) 8))) (pow (- b a) 2)))) (pow x-scale 2))) (* -1 (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (pow x-scale 2)))))))))
(* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2)))
(+ (* -1 (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow x-scale 2))) (* -1 (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))))
(+ (* -1 (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* b (+ (* -1 (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow x-scale 2))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2))))))
(+ (* -1 (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* b (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2))) (* b (+ (* -1 (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow x-scale 2))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2))))))))
(* -1 (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2)))
(* (pow b 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2)))) (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))))
(* (pow b 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2)))) (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))))
(* (pow b 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow b 3) (pow x-scale 2)))) (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))))))
(* -1 (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2)))
(* (pow b 4) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2)))))
(* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (* (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)))) (* b (pow x-scale 2)))) b)) (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))))
(* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow x-scale 2))) (* -1 (/ (+ (* -1 (/ (* (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)))) (* b (pow x-scale 2)))) b))) b)) (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))))
(* -1 (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2)))
(+ (* -1 (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow x-scale 2))) (* -1 (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))))
(+ (* -1 (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* a (+ (* -1 (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow x-scale 2))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2))))))
(+ (* -1 (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* a (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2))) (* a (+ (* -1 (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow x-scale 2))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2))))))))
(* -1 (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2)))
(* (pow a 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2)))) (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))))
(* (pow a 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2)))) (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))))
(* (pow a 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow a 3) (pow x-scale 2)))) (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))))))
(* -1 (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2)))
(* (pow a 4) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2)))))
(* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (* (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)))) (* a (pow x-scale 2)))) a)) (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))))
(* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow x-scale 2))) (* -1 (/ (+ (* -1 (/ (* (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)))) (* a (pow x-scale 2)))) a))) a)) (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))))
(* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (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) (+ (* 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))))))
(/ (+ (* -1 (/ (* (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)))) y-scale)
(+ (* -1 (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) y-scale))) (+ (* -1 (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) 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) y-scale)))))
(+ (* -1 (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) 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) y-scale))) (* b (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) y-scale))) (* b (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) y-scale))) (* 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))) y-scale))))))))
(+ (* -1 (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) 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) y-scale))) (* b (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) y-scale))) (* b (+ (* -1 (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) y-scale))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) y-scale))) (* 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))) y-scale)))))))))
(/ (* (pow b 4) (+ (* -1 (/ (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))))) y-scale)
(* (pow b 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) y-scale)))) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) (* 4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))))))
(* (pow b 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (* (pow x-scale 2) y-scale)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) y-scale)))) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 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) y-scale))))))))
(* (pow b 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (* (pow x-scale 2) y-scale)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) y-scale)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow b 3) (* (pow x-scale 2) y-scale)))) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 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) y-scale)))))))))
(/ (* (pow b 4) (+ (* -1 (/ (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))))) y-scale)
(* (pow b 4) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) y-scale))))))
(* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) y-scale))) (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) y-scale))) (* 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))) y-scale))) b))) b)) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) (* 4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))))))
(* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) y-scale))) (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) y-scale))) (+ (* 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))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* b (* (pow x-scale 2) y-scale))))) b))) b)) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) (* 4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))))))
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale)))
(+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) (* 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))) y-scale)))))
(+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) (+ (* 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))) y-scale)) (* (pow angle 2) (+ (* 1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) (* 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)))) y-scale))))))))
(+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) (+ (* 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))) y-scale)) (* (pow angle 2) (+ (* 1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) (+ (* 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)))) y-scale)) (* (pow angle 2) (+ (* -1 (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) (* 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))))) y-scale)))))))))))
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/ (+ (* -1 (/ (* (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)))) y-scale)
(+ (* -1 (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) y-scale))) (+ (* -1 (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) 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) y-scale)))))
(+ (* -1 (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) 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) y-scale))) (* a (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) y-scale))) (* a (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) y-scale))) (* 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))) y-scale))))))))
(+ (* -1 (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) 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) y-scale))) (* a (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) y-scale))) (* a (+ (* -1 (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) y-scale))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) y-scale))) (* 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))) y-scale)))))))))
(/ (* (pow a 4) (+ (* -1 (/ (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))))) y-scale)
(* (pow a 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) y-scale)))) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) (* 4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))))))
(* (pow a 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (* (pow x-scale 2) y-scale)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) y-scale)))) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 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) y-scale))))))))
(* (pow a 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (* (pow x-scale 2) y-scale)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) y-scale)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow a 3) (* (pow x-scale 2) y-scale)))) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 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) y-scale)))))))))
(/ (* (pow a 4) (+ (* -1 (/ (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))))) y-scale)
(* (pow a 4) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) y-scale))))))
(* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) y-scale))) (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) y-scale))) (* 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))) y-scale))) a))) a)) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) (* 4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))))))
(* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) y-scale))) (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) y-scale))) (+ (* 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))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* a (* (pow x-scale 2) y-scale))))) a))) a)) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) (* 4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))))))
(/ (+ (* -1 (* (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) y-scale))
(/ (+ (* -1 (* (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) y-scale))
(/ (+ (* -1 (* (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) y-scale))
(/ (+ (* -1 (* (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) y-scale))
(/ (+ (* -1 (* (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) y-scale))
(/ (+ (* -1 (* (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) y-scale))
(/ (+ (* -1 (* (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) y-scale))
(/ (+ (* -1 (* (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) y-scale))
(/ (+ (* -1 (* (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) y-scale))
(/ (+ (* -1 (* (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) y-scale))
(/ (+ (* -1 (* (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) y-scale))
(/ (+ (* -1 (* (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) y-scale))
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/ (+ (* -1 (/ (* (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)))) y-scale)
(* -1 (/ (- (* 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) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale))
(+ (* -1 (/ (- (* 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) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* -1 (/ (- (* 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) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (* b (+ (* -1 (* b (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (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))))))
(+ (* -1 (/ (- (* 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) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (* b (+ (* b (+ (* -1 (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))))))
(* -1 (/ (* (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) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) y-scale))
(* (pow b 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow b 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (+ (* -1 (/ (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (+ (* -1 (/ (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 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))))))))
(* -1 (/ (* (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) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) y-scale))
(* (pow b 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale))))
(* (pow b 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (* -1 (/ (- (+ (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (* b y-scale))) (/ (* (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)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) b))))
(* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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)))))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2)))) b)) (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale))))
(* -1 (/ (- (* 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) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale))
(+ (* -1 (/ (- (* 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) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* -1 (/ (- (* 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) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (* a (+ (* -1 (* a (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (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))))))
(+ (* -1 (/ (- (* 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) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (* a (+ (* a (+ (* -1 (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))))))
(* -1 (/ (* (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) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) y-scale))
(* (pow a 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow a 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (+ (* -1 (/ (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (+ (* -1 (/ (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 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))))))))
(* -1 (/ (* (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) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) y-scale))
(* (pow a 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale))))
(* (pow a 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (* -1 (/ (- (+ (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (* a y-scale))) (/ (* (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)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) a))))
(* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 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)))))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2)))) a)) (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1 (* (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) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale))) y-scale)) (* 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) (+ (* -1 (* (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) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)))) y-scale)) (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (* -1 (- (* 4 (/ (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale))) y-scale)) (* 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) (+ (* -1 (- (* 4 (/ (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale))) y-scale)) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (+ (* -1 (* (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) 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))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale))))) y-scale)) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (* -1 (- (* 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) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)))) y-scale)) (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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))) (* -1 (/ (* (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))) (* -1 (/ (* (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))) (* -1 (/ (* (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))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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))
(+ (* -1 (/ (* (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))))
(+ (* -1 (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow x-scale 2))) (+ (* -1 (/ (* (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)))))
(+ (* -1 (/ (* (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 (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2))) (* b (+ (* -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))))))))))
(+ (* -1 (/ (* (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 (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2))) (* b (+ (* -1 (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow x-scale 2))) (+ (* -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)))))))))))
(* (pow b 4) (+ (* -1 (/ (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)))) (+ (* -1 (/ (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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2)))) (+ (* -1 (/ (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) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow b 3) (pow x-scale 2)))) (+ (* -1 (/ (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) (+ (* -1 (/ (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) (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 (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2))))))
(* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow x-scale 2))) (* -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))) b)) (+ (* -1 (/ (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) (+ (* -2 a) (* 2 a))) (pow x-scale 2))) (* -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)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* b (pow x-scale 2))))) b))) b)) (+ (* -1 (/ (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)))
(+ (* 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))) (+ (* 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 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) (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)))) (* (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))))) (* (pow angle 2) (+ (* -1 (/ (* (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)))))))))))))))
(+ (* -1 (/ (* (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))))
(+ (* -1 (/ (* (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))))
(+ (* -1 (/ (* (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))))
(+ (* -1 (/ (* (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))))
(+ (* -1 (/ (* (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))))
(+ (* -1 (/ (* (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))))
(+ (* -1 (/ (* (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))))
(+ (* -1 (/ (* (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))))
(+ (* -1 (/ (* (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))))
(+ (* -1 (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow x-scale 2))) (+ (* -1 (/ (* (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)))))
(+ (* -1 (/ (* (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 (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2))) (* a (+ (* -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))))))))))
(+ (* -1 (/ (* (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 (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2))) (* a (+ (* -1 (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow x-scale 2))) (+ (* -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)))))))))))
(* (pow a 4) (+ (* -1 (/ (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)))) (+ (* -1 (/ (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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2)))) (+ (* -1 (/ (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) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow a 3) (pow x-scale 2)))) (+ (* -1 (/ (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) (+ (* -1 (/ (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) (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 (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2))))))
(* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow x-scale 2))) (* -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))) a)) (+ (* -1 (/ (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) (+ (* -2 b) (* 2 b))) (pow x-scale 2))) (* -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)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* a (pow x-scale 2))))) a))) a)) (+ (* -1 (/ (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))))))
(/ (+ (* -1 (* (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 (* (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 (* (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 (* (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 (* (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 (* (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 (* (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 (* (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 (* (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 (* (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 (* (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 (* (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/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/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))))
(/ (* (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 2) (+ (/ (* (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 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 2) (+ (/ (* (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) (* (+ 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/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)))
(+ (* (pow b 2) (+ (/ (* (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) (* (+ 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/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/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/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow x-scale 2))))))
(* (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 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (* (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 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 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (* (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 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) (+ (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow x-scale 2))))))
(* (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 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (* (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 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 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (* (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 a 2) (pow b 2)) (pow x-scale 2))
(+ (* (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 b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(+ (* (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))))) (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 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 a 2) (pow b 2)) (pow x-scale 2)))
(+ (* (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))))) (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)))))) (+ (/ (* (+ (* -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 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 a 2) (pow b 2)) (pow x-scale 2)))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/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 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 2) (+ (/ (* (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 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 2) (+ (/ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)) (+ (/ (* (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 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 2) (+ (/ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)) (+ (/ (* (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 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) (* (+ 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/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow x-scale 2))))))
(* (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 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow x-scale 2))) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (* (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 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 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow x-scale 2))) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (* (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 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) (+ (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow x-scale 2))))))
(* (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 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow x-scale 2))) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (* (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 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 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow x-scale 2))) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (* (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 a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))
Outputs
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.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 -4 binary64) (fma.f64 (*.f64 a a) (/.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 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 angle angle) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (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 (*.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 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 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 (*.f64 (*.f64 b b) (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) (fma.f64 (*.f64 a a) (/.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 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 (*.f64 x-scale 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 (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 (*.f64 a a) #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64)))) (/.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))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))))) (*.f64 (*.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 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #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 (*.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 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 (*.f64 (*.f64 b b) (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) (fma.f64 (*.f64 a a) (/.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 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.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 -4 binary64) (fma.f64 (*.f64 a a) (/.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 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 angle angle) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (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 (*.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 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 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 (*.f64 (*.f64 b b) (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) (fma.f64 (*.f64 a a) (/.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 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 (*.f64 x-scale 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 (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 (*.f64 a a) #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64)))) (/.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))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))))) (*.f64 (*.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 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #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 (*.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 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 (*.f64 (*.f64 b b) (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) (fma.f64 (*.f64 a a) (/.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 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 #s(literal -4 binary64) (*.f64 a a)) (*.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) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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 -4 binary64) (fma.f64 (*.f64 a a) (/.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 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.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) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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 -4 binary64) (fma.f64 (*.f64 a a) (/.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 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.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) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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 -4 binary64) (fma.f64 (*.f64 a a) (/.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 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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))))))
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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)))))))
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (+.f64 (fma.f64 (*.f64 a a) (/.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 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 angle angle)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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)))))))
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (+.f64 (fma.f64 (*.f64 a a) (/.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 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 angle angle)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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)))))))
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (+.f64 (fma.f64 (*.f64 a a) (/.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 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 angle angle)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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))))))
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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)))))))
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (+.f64 (fma.f64 (*.f64 a a) (/.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 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 angle angle)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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)))))))
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (+.f64 (fma.f64 (*.f64 a a) (/.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 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 angle angle)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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)))))))
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (+.f64 (fma.f64 (*.f64 a a) (/.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 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 angle angle)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow angle 2) (+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (*.f64 angle angle) #s(literal 0 binary64))
(+ (* 1/8100 (/ (* (pow angle 2) (* b (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 b (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64)))
(+ (* b (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* b (+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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) (+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 b (fma.f64 b (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4050 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64)))
(+ (* b (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* b (+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow angle 2) (* b (* (pow (PI) 2) (+ (* -2 a) (* 2 a))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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) (+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 b (fma.f64 b (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4050 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 angle angle) (*.f64 b (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64)))
(* (pow angle 2) (* (pow b 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 angle angle) (*.f64 #s(literal 0 binary64) (pow.f64 b #s(literal 4 binary64))))
(* (pow b 4) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))))
(* (pow b 4) (+ (* -4 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 angle angle) (+.f64 #s(literal 0 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4050 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 b b))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64)))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))))))
(* (pow b 4) (+ (* -4 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow b 3) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/8100 binary64) (fma.f64 (*.f64 angle angle) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 b (*.f64 b b))))) (*.f64 (*.f64 angle angle) (+.f64 #s(literal 0 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4050 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 b b)))))))
(* (pow angle 2) (* (pow b 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 angle angle) (*.f64 #s(literal 0 binary64) (pow.f64 b #s(literal 4 binary64))))
(* (pow b 4) (+ (* -1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))))
(* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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))))))) b)) (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2))))) b)) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4050 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) b)) b)))
(* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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)))))))) b)) (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2))))) b)) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.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 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4050 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))))) b)) b)))
(* (pow angle 2) (+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (*.f64 angle angle) #s(literal 0 binary64))
(+ (* 1/8100 (/ (* a (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 angle angle)) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64)))
(+ (* a (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* a (+ (* -4 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 a (fma.f64 a (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/4050 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64)))
(+ (* a (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* a (+ (* -4 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* a (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 a (fma.f64 a (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/4050 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 a (*.f64 angle angle)) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64)))
(* (pow a 4) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 angle angle) #s(literal 0 binary64)))
(* (pow a 4) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))))
(* (pow a 4) (+ (* -4 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (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 -4 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 angle angle) (+.f64 #s(literal 0 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/4050 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 a a))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64)))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))))))
(* (pow a 4) (+ (* -4 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow a 3) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (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 -4 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/8100 binary64) (fma.f64 (*.f64 angle angle) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 a (*.f64 a a))))) (*.f64 (*.f64 angle angle) (+.f64 #s(literal 0 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/4050 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 a a)))))))
(* (pow a 4) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 angle angle) #s(literal 0 binary64)))
(* (pow a 4) (+ (* -1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))))
(* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) a)) (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2))))) a)) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/4050 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) a)) a)))
(* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) a)) (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2))))) a)) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.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 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/4050 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -1/8100 binary64) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.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 y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 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 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 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 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 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 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 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 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 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 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 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 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 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 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 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 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 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 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 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 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 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 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 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 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 x-scale)) (*.f64 (*.f64 b b) (/.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 x-scale)))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 x-scale)) (*.f64 (*.f64 b b) (/.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 x-scale)))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 x-scale)) (*.f64 (*.f64 b b) (/.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 x-scale)))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 x-scale)) (*.f64 (*.f64 b b) (/.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 x-scale)))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 x-scale)) (*.f64 (*.f64 b b) (/.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 x-scale)))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 x-scale)) (*.f64 (*.f64 b b) (/.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 x-scale)))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 x-scale)) (*.f64 (*.f64 b b) (/.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 x-scale)))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 x-scale)) (*.f64 (*.f64 b b) (/.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 x-scale)))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 x-scale)) (*.f64 (*.f64 b b) (/.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 x-scale)))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 x-scale)) (*.f64 (*.f64 b b) (/.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 x-scale)))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 x-scale)) (*.f64 (*.f64 b b) (/.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 x-scale)))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 x-scale)) (*.f64 (*.f64 b b) (/.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 x-scale)))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(pow angle 2)
(*.f64 angle angle)
(pow angle 2)
(*.f64 angle angle)
(pow angle 2)
(*.f64 angle angle)
(pow angle 2)
(*.f64 angle angle)
(pow angle 2)
(*.f64 angle angle)
(pow angle 2)
(*.f64 angle angle)
(pow angle 2)
(*.f64 angle angle)
(pow angle 2)
(*.f64 angle angle)
(pow angle 2)
(*.f64 angle angle)
(pow angle 2)
(*.f64 angle angle)
(pow angle 2)
(*.f64 angle angle)
(pow angle 2)
(*.f64 angle angle)
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.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 -4 binary64) (fma.f64 (*.f64 a a) (/.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 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 angle angle) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (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 (*.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 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 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 (*.f64 (*.f64 b b) (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) (fma.f64 (*.f64 a a) (/.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 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 (*.f64 x-scale 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 (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 (*.f64 a a) #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64)))) (/.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))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))))) (*.f64 (*.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 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #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 (*.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 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 (*.f64 (*.f64 b b) (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) (fma.f64 (*.f64 a a) (/.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 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 a a)) (*.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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.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)))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.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 -4 binary64) (fma.f64 (*.f64 a a) (/.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 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 angle angle) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (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 (*.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 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 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 (*.f64 (*.f64 b b) (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) (fma.f64 (*.f64 a a) (/.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 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 (*.f64 x-scale 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 (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 (*.f64 a a) #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64)))) (/.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))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))))) (*.f64 (*.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 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #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 (*.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 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 (*.f64 (*.f64 b b) (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) (fma.f64 (*.f64 a a) (/.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 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/ (* a (pow b 2)) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)
(* -4 (/ (* a (pow b 2)) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)
(* -4 (/ (* a (pow b 2)) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)
(* -4 (/ (* a (pow b 2)) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)
(* -4 (/ (* a (pow b 2)) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)
(* -4 (/ (* a (pow b 2)) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)
(* -4 (/ (* a (pow b 2)) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)
(* -4 (/ (* a (pow b 2)) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)
(* -4 (/ (* a (pow b 2)) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)
(* -4 (/ (* a (pow b 2)) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)
(* -4 (/ (* a (pow b 2)) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)
(* -4 (/ (* a (pow b 2)) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)
(* -4 (/ (* a (pow b 2)) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)
(* -4 (/ (* a (pow b 2)) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)
(* -4 (/ (* a (pow b 2)) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)
(* -4 (/ (* a (pow b 2)) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)
(* -4 (/ (* a (pow b 2)) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)
(* -4 (/ (* a (pow b 2)) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)
(* -4 (/ (* a (pow b 2)) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)
(* -4 (/ (* a (pow b 2)) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)
(* -4 (/ (* a (pow b 2)) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)
(* -4 (/ (* a (pow b 2)) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)
(* -4 (/ (* a (pow b 2)) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)
(* -4 (/ (* a (pow b 2)) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)
(* -4 (/ (* a (pow b 2)) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)
(* -4 (/ (* a (pow b 2)) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)
(* -4 (/ (* a (pow b 2)) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)
(* -4 (/ (* a (pow b 2)) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)
(* -4 (/ (* a (pow b 2)) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)
(* -4 (/ (* a (pow b 2)) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)
(* -4 (/ (* a (pow b 2)) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)
(* -4 (/ (* a (pow b 2)) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)
(* -4 (/ (* a (pow b 2)) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)
(* -4 (/ (* a (pow b 2)) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)
(* -4 (/ (* a (pow b 2)) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)
(* -4 (/ (* a (pow b 2)) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)
(* -1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))
(/.f64 (*.f64 #s(literal -1/8100 binary64) (*.f64 (*.f64 (*.f64 angle (PI.f64)) (*.f64 angle (PI.f64))) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.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))) (* 1/196830000 (/ (* (pow angle 2) (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))))
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal 1/196830000 binary64) (*.f64 (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.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 (/ (* (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))) (* 1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))))
(*.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (-.f64 (/.f64 (*.f64 #s(literal 1/196830000 binary64) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (*.f64 (+.f64 a b) (+.f64 a b))) (*.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 (*.f64 #s(literal -1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.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) (+ (* -1 (/ (* (pow angle 2) (* (pow (+ a b) 2) (* (+ (* -1/1549681956000000000 (pow (PI) 8)) (* -1/10847773692000000000 (pow (PI) 8))) (pow (- b a) 2)))) (pow x-scale 2))) (* -1 (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (pow x-scale 2)))))))))
(*.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 angle angle) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) #s(literal -1/1355971711500000000 binary64))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.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 (*.f64 #s(literal 1/196830000 binary64) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2)))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale))))
(+ (* -1 (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow x-scale 2))) (* -1 (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))))
(neg.f64 (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))))))
(+ (* -1 (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* b (+ (* -1 (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow x-scale 2))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2))))))
(fma.f64 b (neg.f64 (fma.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(+ (* -1 (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* b (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2))) (* b (+ (* -1 (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow x-scale 2))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2))))))))
(fma.f64 b (fma.f64 b (neg.f64 (fma.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 x-scale x-scale))))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(* -1 (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2)))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.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)))) (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (neg.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 b (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))
(* (pow b 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2)))) (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 b (*.f64 x-scale x-scale)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))
(* (pow b 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow b 3) (pow x-scale 2)))) (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 b (*.f64 x-scale x-scale)))))) (neg.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))
(* -1 (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2)))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale))))
(* (pow b 4) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2)))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 b (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (* (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)))) (* b (pow x-scale 2)))) b)) (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 b (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))) (neg.f64 b)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))
(* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow x-scale 2))) (* -1 (/ (+ (* -1 (/ (* (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)))) (* b (pow x-scale 2)))) b))) b)) (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale))) (/.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 b (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 x-scale x-scale)))) b))) b)))
(* -1 (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2)))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale))))
(+ (* -1 (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow x-scale 2))) (* -1 (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))))
(neg.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 a (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))))))
(+ (* -1 (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* a (+ (* -1 (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow x-scale 2))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2))))))
(fma.f64 a (neg.f64 (fma.f64 a (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(+ (* -1 (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* a (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2))) (* a (+ (* -1 (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow x-scale 2))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2))))))))
(fma.f64 a (fma.f64 a (neg.f64 (fma.f64 a (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 x-scale x-scale))))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(* -1 (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2)))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.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)))) (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (neg.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))
(* (pow a 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2)))) (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))))))
(* (pow a 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow a 3) (pow x-scale 2)))) (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 x-scale x-scale)))))) (neg.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))
(* -1 (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2)))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale))))
(* (pow a 4) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2)))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (* (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)))) (* a (pow x-scale 2)))) a)) (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 a (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))) (neg.f64 a)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))
(* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow x-scale 2))) (* -1 (/ (+ (* -1 (/ (* (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)))) (* a (pow x-scale 2)))) a))) a)) (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 x-scale x-scale)))) a))) (neg.f64 a)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.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 (*.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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale))))) y-scale)
(+ (* -1 (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) y-scale))) (+ (* -1 (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) 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) y-scale)))))
(-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (*.f64 (neg.f64 (pow.f64 a #s(literal 4 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))) (*.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale)))))
(+ (* -1 (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) 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) y-scale))) (* b (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) y-scale))) (* b (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) y-scale))) (* 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))) y-scale))))))))
(-.f64 (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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))
(+ (* -1 (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) 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) y-scale))) (* b (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) y-scale))) (* b (+ (* -1 (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) y-scale))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) y-scale))) (* 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))) y-scale)))))))))
(-.f64 (fma.f64 b (fma.f64 b (+.f64 (neg.f64 (fma.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))
(/ (* (pow b 4) (+ (* -1 (/ (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))))) y-scale)
(/.f64 (*.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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale))))) y-scale)
(* (pow b 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) y-scale)))) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) (* 4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))) (neg.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) y-scale)))))
(* (pow b 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (* (pow x-scale 2) y-scale)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) y-scale)))) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 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) y-scale))))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) y-scale))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) y-scale))))) (fma.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) y-scale))) (neg.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))))
(* (pow b 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (* (pow x-scale 2) y-scale)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) y-scale)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow b 3) (* (pow x-scale 2) y-scale)))) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 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) y-scale)))))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 b (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) y-scale))))))) (fma.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) y-scale))) (neg.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))))
(/ (* (pow b 4) (+ (* -1 (/ (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))))) y-scale)
(/.f64 (*.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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale))))) y-scale)
(* (pow b 4) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) y-scale))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) y-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))
(* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) y-scale))) (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) y-scale))) (* 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))) y-scale))) b))) b)) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) (* 4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))) (neg.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))) (/.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))) b))) b)))
(* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) y-scale))) (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) y-scale))) (+ (* 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))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* b (* (pow x-scale 2) y-scale))))) b))) b)) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) (* 4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))) (neg.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))) (/.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (-.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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) y-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))) b))) b)))
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) y-scale))
(+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) (* 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))) y-scale)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 (*.f64 a a) (/.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 x-scale)) (*.f64 (*.f64 b b) (/.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 x-scale)))) y-scale) (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) y-scale)))
(+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) (+ (* 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))) y-scale)) (* (pow angle 2) (+ (* 1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) (* 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)))) y-scale))))))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (/.f64 (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 (*.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 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))))) y-scale) (*.f64 #s(literal 1/196830000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (/.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 x-scale)) (*.f64 (*.f64 b b) (/.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 x-scale))))) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) y-scale)))
(+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) (+ (* 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))) y-scale)) (* (pow angle 2) (+ (* 1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) (+ (* 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)))) y-scale)) (* (pow angle 2) (+ (* -1 (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) (* 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))))) y-scale)))))))))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/196830000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (/.f64 (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 #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 (*.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 #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 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 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 x-scale))))) y-scale) (/.f64 (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/11957422500000 binary64)))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (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 (*.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 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))))) y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (/.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 x-scale)) (*.f64 (*.f64 b b) (/.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 x-scale))))) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) y-scale)))
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/.f64 (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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale))))) y-scale)
(+ (* -1 (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) y-scale))) (+ (* -1 (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) 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) y-scale)))))
(-.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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))) (*.f64 (neg.f64 (pow.f64 b #s(literal 4 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))) (*.f64 a (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale)))))
(+ (* -1 (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) 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) y-scale))) (* a (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) y-scale))) (* a (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) y-scale))) (* 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))) y-scale))))))))
(-.f64 (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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (*.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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))
(+ (* -1 (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) 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) y-scale))) (* a (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) y-scale))) (* a (+ (* -1 (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) y-scale))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) y-scale))) (* 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))) y-scale)))))))))
(-.f64 (fma.f64 a (fma.f64 a (+.f64 (neg.f64 (fma.f64 a (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (*.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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))
(/ (* (pow a 4) (+ (* -1 (/ (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))))) y-scale)
(/.f64 (*.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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale))))) y-scale)
(* (pow a 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) y-scale)))) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) (* 4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))))
(* (pow a 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (* (pow x-scale 2) y-scale)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) y-scale)))) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 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) y-scale))))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 a a) y-scale))))))
(* (pow a 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (* (pow x-scale 2) y-scale)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) y-scale)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow a 3) (* (pow x-scale 2) y-scale)))) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 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) y-scale)))))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (+.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) y-scale))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) y-scale))))) (neg.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 a a) y-scale))))))
(/ (* (pow a 4) (+ (* -1 (/ (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))))) y-scale)
(/.f64 (*.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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale))))) y-scale)
(* (pow a 4) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) y-scale))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) y-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))
(* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) y-scale))) (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) y-scale))) (* 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))) y-scale))) a))) a)) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) (* 4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))) (neg.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))) (/.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))) a))) a)))
(* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) y-scale))) (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) y-scale))) (+ (* 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))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* a (* (pow x-scale 2) y-scale))))) a))) a)) (+ (* -1 (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) (* 4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))) (neg.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))) (/.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (-.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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) y-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))) a))) a)))
(/ (+ (* -1 (* (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) y-scale))
(/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (neg.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale))
(/ (+ (* -1 (* (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) y-scale))
(/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (neg.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale))
(/ (+ (* -1 (* (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) y-scale))
(/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (neg.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale))
(/ (+ (* -1 (* (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) y-scale))
(/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (neg.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale))
(/ (+ (* -1 (* (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) y-scale))
(/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (neg.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale))
(/ (+ (* -1 (* (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) y-scale))
(/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (neg.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale))
(/ (+ (* -1 (* (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) y-scale))
(/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (neg.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale))
(/ (+ (* -1 (* (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) y-scale))
(/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (neg.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale))
(/ (+ (* -1 (* (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) y-scale))
(/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (neg.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale))
(/ (+ (* -1 (* (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) y-scale))
(/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (neg.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale))
(/ (+ (* -1 (* (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) y-scale))
(/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (neg.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale))
(/ (+ (* -1 (* (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) y-scale))
(/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (neg.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale))
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)
(/ (+ (* -1 (/ (* (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)))) y-scale)
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)
(* -1 (/ (- (* 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) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (*.f64 (neg.f64 (pow.f64 a #s(literal 4 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 y-scale))
(+ (* -1 (/ (- (* 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) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2))))
(-.f64 (*.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (*.f64 (neg.f64 (pow.f64 a #s(literal 4 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))) y-scale))
(+ (* -1 (/ (- (* 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) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (* b (+ (* -1 (* b (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (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))))))
(fma.f64 b (fma.f64 (fma.f64 #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) y-scale) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) y-scale))) y-scale) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (neg.f64 b) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (*.f64 (neg.f64 (pow.f64 a #s(literal 4 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 y-scale)))
(+ (* -1 (/ (- (* 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) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (* b (+ (* b (+ (* -1 (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))))))
(-.f64 (*.f64 b (fma.f64 b (-.f64 (*.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (fma.f64 #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) y-scale) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) y-scale))) y-scale) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (*.f64 (neg.f64 (pow.f64 a #s(literal 4 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))) y-scale))
(* -1 (/ (* (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) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) y-scale))
(/.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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))) (neg.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (neg.f64 y-scale))
(* (pow b 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))) (neg.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))) y-scale)))
(* (pow b 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (+ (* -1 (/ (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) y-scale) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) y-scale))) y-scale) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 b b))) (/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))) (neg.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))) y-scale)))
(* (pow b 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (+ (* -1 (/ (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 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))))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 (fma.f64 #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) y-scale) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) y-scale))) y-scale) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 b b))) (/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))) (neg.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))) y-scale)))
(* -1 (/ (* (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) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) y-scale))
(/.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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))) (neg.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (neg.f64 y-scale))
(* (pow b 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (neg.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))) (neg.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))) y-scale))))
(* (pow b 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (* -1 (/ (- (+ (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (* b y-scale))) (/ (* (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)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) b))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))) (neg.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 y-scale)) (/.f64 (fma.f64 #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) y-scale) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) y-scale))) (*.f64 b y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))))) b)))
(* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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)))))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2)))) b)) (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))) (neg.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 y-scale)) (/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (fma.f64 #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) y-scale) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) y-scale))) y-scale) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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)))
(* -1 (/ (- (* 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) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale))
(/.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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))) (*.f64 (neg.f64 (pow.f64 b #s(literal 4 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 y-scale))
(+ (* -1 (/ (- (* 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) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2))))
(-.f64 (*.f64 a (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 (pow.f64 b #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))) (*.f64 (neg.f64 (pow.f64 b #s(literal 4 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))) y-scale))
(+ (* -1 (/ (- (* 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) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (* a (+ (* -1 (* a (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (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))))))
(fma.f64 a (fma.f64 (fma.f64 #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) y-scale) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) y-scale))) y-scale) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (neg.f64 a) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 (pow.f64 b #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))) (*.f64 (neg.f64 (pow.f64 b #s(literal 4 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 y-scale)))
(+ (* -1 (/ (- (* 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) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (* a (+ (* a (+ (* -1 (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))))))
(-.f64 (*.f64 a (fma.f64 a (-.f64 (*.f64 a (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (fma.f64 #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) y-scale) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) y-scale))) y-scale) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 (pow.f64 b #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))) (*.f64 (neg.f64 (pow.f64 b #s(literal 4 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))) y-scale))
(* -1 (/ (* (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) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) y-scale))
(/.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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))) (neg.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (neg.f64 y-scale))
(* (pow a 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))) (neg.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))) y-scale)))
(* (pow a 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (+ (* -1 (/ (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) y-scale) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) y-scale))) y-scale) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 a a))) (/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))) (neg.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))) y-scale)))
(* (pow a 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (+ (* -1 (/ (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 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))))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 (fma.f64 #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) y-scale) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) y-scale))) y-scale) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 a a))) (/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))) (neg.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))) y-scale)))
(* -1 (/ (* (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) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) y-scale))
(/.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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))) (neg.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (neg.f64 y-scale))
(* (pow a 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (neg.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))) (neg.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))) y-scale))))
(* (pow a 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (* -1 (/ (- (+ (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (* a y-scale))) (/ (* (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)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) a))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))) (neg.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 y-scale)) (/.f64 (fma.f64 #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) y-scale) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) y-scale))) (*.f64 a y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))))) a)))
(* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 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)))))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2)))) a)) (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))) (neg.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 y-scale)) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (fma.f64 #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) y-scale) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) y-scale))) y-scale) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (neg.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 a a)) (*.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)))) (* -1 (* (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) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale))) y-scale)) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))))))
(fma.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 (*.f64 a a) (/.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 x-scale x-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 (*.f64 x-scale x-scale) y-scale))) y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/8100 binary64))) (neg.f64 (*.f64 angle angle)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.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) (+ (* -1 (* (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) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)))) y-scale)) (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (* -1 (- (* 4 (/ (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale))) y-scale)) (* 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) (neg.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (/.f64 (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 (*.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 x-scale 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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.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))))) (*.f64 (*.f64 x-scale x-scale) y-scale)))) y-scale) (*.f64 #s(literal 1/196830000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 (*.f64 a a) (/.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 x-scale x-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 (*.f64 x-scale x-scale) y-scale))) y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/8100 binary64))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.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) (+ (* -1 (- (* 4 (/ (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale))) y-scale)) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (+ (* -1 (* (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) 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))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale))))) y-scale)) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (* -1 (- (* 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) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)))) y-scale)) (* -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) (neg.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (/.f64 (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 #s(literal -1/3149280000 binary64) (*.f64 a a) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (*.f64 (*.f64 x-scale x-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 #s(literal -1/3149280000 binary64) (*.f64 b b) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 (*.f64 x-scale 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 (*.f64 x-scale 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 (*.f64 x-scale x-scale) y-scale))))) y-scale) (/.f64 (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/11957422500000 binary64)))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (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 (*.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 x-scale 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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.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))))) (*.f64 (*.f64 x-scale x-scale) y-scale)))) y-scale) (*.f64 #s(literal 1/196830000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (neg.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 (*.f64 a a) (/.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 x-scale x-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 (*.f64 x-scale x-scale) y-scale))) y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/8100 binary64))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) y-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (neg.f64 y-scale))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) y-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (neg.f64 y-scale))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) y-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (neg.f64 y-scale))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) y-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (neg.f64 y-scale))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) y-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (neg.f64 y-scale))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) y-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (neg.f64 y-scale))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) y-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (neg.f64 y-scale))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) y-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (neg.f64 y-scale))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) y-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (neg.f64 y-scale))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) y-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (neg.f64 y-scale))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) y-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (neg.f64 y-scale))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) y-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (neg.f64 y-scale))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))) (neg.f64 (*.f64 y-scale y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))) (neg.f64 (*.f64 y-scale y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))) (neg.f64 (*.f64 y-scale y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))) (neg.f64 (*.f64 y-scale y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))) (neg.f64 (*.f64 y-scale y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))) (neg.f64 (*.f64 y-scale y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))) (neg.f64 (*.f64 y-scale y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale))))) (neg.f64 (*.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))) (* -1 (/ (* (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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.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))) (* -1 (/ (* (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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.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))) (* -1 (/ (* (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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.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))) (* -1 (/ (* (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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale 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))
(+ (* -1 (/ (* (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 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(+ (* -1 (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow x-scale 2))) (+ (* -1 (/ (* (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)))))
(-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale))))) (*.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))))
(+ (* -1 (/ (* (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 (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2))) (* b (+ (* -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))))))))))
(-.f64 (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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 x-scale x-scale))))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))
(+ (* -1 (/ (* (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 (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2))) (* b (+ (* -1 (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow x-scale 2))) (+ (* -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)))))))))))
(-.f64 (fma.f64 b (-.f64 (*.f64 b (+.f64 (neg.f64 (fma.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))
(* (pow b 4) (+ (* -1 (/ (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)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.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)))) (+ (* -1 (/ (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 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 b (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))))
(* (pow b 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2)))) (+ (* -1 (/ (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)) (fma.f64 #s(literal -1 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 b (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 b b))))))
(* (pow b 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow b 3) (pow x-scale 2)))) (+ (* -1 (/ (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 #s(literal -1 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 b (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 b b))))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))
(* (pow b 4) (+ (* -1 (/ (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)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(* (pow b 4) (+ (* -1 (/ (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 (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 b (*.f64 x-scale x-scale))))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))
(* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow x-scale 2))) (* -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))) b)) (+ (* -1 (/ (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 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))) (/.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 x-scale x-scale))))) b))) b)))
(* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow x-scale 2))) (* -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)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* b (pow x-scale 2))))) b))) b)) (+ (* -1 (/ (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 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))) (/.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)) (/.f64 (-.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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 b (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 x-scale x-scale)))) b))) b)))
(* 4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))
(+ (* 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)))))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (/.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 x-scale)) (*.f64 (*.f64 b b) (/.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 x-scale)))))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))
(+ (* 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)))) (* (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)))))))))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #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 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 (*.f64 #s(literal 1/196830000 binary64) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (/.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 x-scale)) (*.f64 (*.f64 b b) (/.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 x-scale))))))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))
(+ (* 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)))) (* (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))))) (* (pow angle 2) (+ (* -1 (/ (* (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)))))))))))))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.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 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (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 (*.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 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 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (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 #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 (*.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 #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 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 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 x-scale))))) (/.f64 (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/11957422500000 binary64)))) (neg.f64 (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (/.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 x-scale)) (*.f64 (*.f64 b b) (/.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 x-scale))))))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))
(+ (* -1 (/ (* (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))))
(fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale)))))
(+ (* -1 (/ (* (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))))
(fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale)))))
(+ (* -1 (/ (* (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))))
(fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale)))))
(+ (* -1 (/ (* (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))))
(fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale)))))
(+ (* -1 (/ (* (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))))
(fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale)))))
(+ (* -1 (/ (* (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))))
(fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale)))))
(+ (* -1 (/ (* (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))))
(fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale)))))
(+ (* -1 (/ (* (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))))
(fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale x-scale)))))
(+ (* -1 (/ (* (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 #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(+ (* -1 (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow x-scale 2))) (+ (* -1 (/ (* (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)))))
(+.f64 (neg.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 a (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)))
(+ (* -1 (/ (* (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 (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2))) (* a (+ (* -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))))))))))
(-.f64 (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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 x-scale x-scale))))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))
(+ (* -1 (/ (* (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 (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2))) (* a (+ (* -1 (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow x-scale 2))) (+ (* -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)))))))))))
(-.f64 (fma.f64 a (fma.f64 a (+.f64 (neg.f64 (fma.f64 a (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))
(* (pow a 4) (+ (* -1 (/ (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)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.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)))) (+ (* -1 (/ (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 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))))
(* (pow a 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2)))) (+ (* -1 (/ (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)) (fma.f64 #s(literal -1 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 a a))))))
(* (pow a 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow a 3) (pow x-scale 2)))) (+ (* -1 (/ (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 #s(literal -1 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 a a))))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))))))
(* (pow a 4) (+ (* -1 (/ (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)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(* (pow a 4) (+ (* -1 (/ (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 (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 x-scale x-scale))))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))
(* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow x-scale 2))) (* -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))) a)) (+ (* -1 (/ (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 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))) (/.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 x-scale x-scale))))) a))) a)))
(* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow x-scale 2))) (* -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)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* a (pow x-scale 2))))) a))) a)) (+ (* -1 (/ (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 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))) (/.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)) (/.f64 (-.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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 x-scale x-scale)))) a))) a)))
(/ (+ (* -1 (* (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 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (neg.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))
(/ (+ (* -1 (* (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 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (neg.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))
(/ (+ (* -1 (* (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 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (neg.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))
(/ (+ (* -1 (* (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 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (neg.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))
(/ (+ (* -1 (* (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 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (neg.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))
(/ (+ (* -1 (* (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 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (neg.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))
(/ (+ (* -1 (* (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 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (neg.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))
(/ (+ (* -1 (* (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 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (neg.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))
(/ (+ (* -1 (* (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 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (neg.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))
(/ (+ (* -1 (* (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 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (neg.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))
(/ (+ (* -1 (* (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 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (neg.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))
(/ (+ (* -1 (* (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 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (neg.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))
(* 1/90 (* angle (PI)))
(*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))
(* 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 (*.f64 angle angle) (fma.f64 #s(literal -1/4374000 binary64) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.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 #s(literal 1/708588000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (*.f64 #s(literal -1/241061637600000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 7 binary64)))) (*.f64 #s(literal -1/4374000 binary64) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))))) (*.f64 (PI.f64) #s(literal 1/90 binary64))))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64)))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64)))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64)))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64)))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64)))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64)))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64)))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) 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 #s(literal 1/90 binary64) angle) (PI.f64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64)))
(/ (* (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))
(/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))
(+ (* (pow b 2) (+ (/ (* (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 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 (*.f64 b b) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)))
(+ (* (pow b 2) (+ (/ (* (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) (* (+ 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/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)))
(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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)))
(+ (* (pow b 2) (+ (/ (* (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) (* (+ 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/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)))
(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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)))
(/ (* (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))
(/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))
(* (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 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow x-scale 2))))))
(*.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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))))
(* (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 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (* (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)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 b #s(literal 4 binary64)))))))
(* (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 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (* (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)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 b #s(literal 4 binary64)))))))
(/ (* (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))
(/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))
(* (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 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow x-scale 2))))))
(*.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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))))
(* (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 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (* (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)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 b #s(literal 4 binary64)))))))
(* (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 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (* (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)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 b #s(literal 4 binary64)))))))
(/ (* (pow a 2) (pow b 2)) (pow x-scale 2))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))
(+ (* (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 b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 a a) (/.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 x-scale)) (*.f64 (*.f64 b b) (/.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 x-scale)))) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale x-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))))) (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 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 a 2) (pow b 2)) (pow x-scale 2)))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (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 (*.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 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))))) (fma.f64 (*.f64 a a) (/.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 x-scale)) (*.f64 (*.f64 b b) (/.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 x-scale))))) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale x-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))))) (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)))))) (+ (/ (* (+ (* -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 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 a 2) (pow b 2)) (pow x-scale 2)))
(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 (*.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 #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 (*.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 #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 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 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 x-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 (*.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 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)))))) (fma.f64 (*.f64 a a) (/.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 x-scale)) (*.f64 (*.f64 b b) (/.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 x-scale))))) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))
(/ (* (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))
(/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))
(+ (* (pow a 2) (+ (/ (* (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 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 (*.f64 a a) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-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)))))))) (pow x-scale 2)) (+ (/ (* (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 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 (*.f64 a a) (fma.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-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)))))))) (pow x-scale 2)) (+ (/ (* (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 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 (*.f64 a a) (fma.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))
(/ (* (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))
(/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))
(* (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 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow x-scale 2))))))
(*.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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))))
(* (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 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow x-scale 2))) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (* (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)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 a #s(literal 4 binary64)))))))
(* (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 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow x-scale 2))) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (* (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)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 a #s(literal 4 binary64)))))))
(/ (* (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))
(/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))
(* (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 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow x-scale 2))))))
(*.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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))))
(* (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 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow x-scale 2))) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (* (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)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 a #s(literal 4 binary64)))))))
(* (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 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow x-scale 2))) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (* (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)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 a #s(literal 4 binary64)))))))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))

rewrite280.0ms (0.2%)

Memory
25.5MiB live, 744.4MiB allocated
Rules
6 616×lower-*.f32
6 574×lower-*.f64
6 052×lower-fma.f32
6 044×lower-fma.f64
3 176×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01621313
02151161
11024978
09008967
Stop Event
iter limit
node limit
iter limit
Counts
23 → 535
Calls
Call 1
Inputs
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a 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 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(*.f64 (*.f64 angle angle) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))))
#s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64)))
(*.f64 angle angle)
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.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 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a)
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale)
(*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))
(+.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 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)
(/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale))
(*.f64 x-scale (*.f64 y-scale y-scale))
(fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)))))
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(/.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))
Outputs
(neg.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale))))
(neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 x-scale a))
(/.f64 (/.f64 a x-scale) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))
(/.f64 (/.f64 a x-scale) (*.f64 (/.f64 x-scale (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 y-scale y-scale)))
(/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (*.f64 (/.f64 x-scale a) (*.f64 y-scale y-scale)))
(/.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 x-scale (*.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 x-scale)) (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-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 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale) a))))
(/.f64 #s(literal 1 binary64) (/.f64 x-scale (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) a)))
(/.f64 #s(literal 1 binary64) (/.f64 x-scale (*.f64 a (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) x-scale)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))))
(/.f64 (*.f64 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale) a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) a) x-scale)
(/.f64 (*.f64 a (/.f64 (*.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)))) x-scale) (*.f64 x-scale (*.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 y-scale y-scale)) (/.f64 x-scale a)))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #s(literal 1 binary64)) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a)))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) #s(literal 1 binary64)) (*.f64 (*.f64 y-scale y-scale) (/.f64 x-scale a)))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (neg.f64 a)) (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) a) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) x-scale))
(/.f64 (*.f64 #s(literal 1 binary64) a) (*.f64 (/.f64 x-scale (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 a)) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (neg.f64 x-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 a)) (*.f64 (/.f64 x-scale (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale))))
(/.f64 (*.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale)) (/.f64 x-scale a)))
(/.f64 (*.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #s(literal 1 binary64)) (*.f64 (neg.f64 x-scale) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a)))
(/.f64 (*.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (neg.f64 a)) (*.f64 (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale)) (neg.f64 x-scale)))
(/.f64 (*.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (neg.f64 a)) (*.f64 (neg.f64 x-scale) (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale))))
(/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 x-scale (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 (/.f64 x-scale a) (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a) x-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) (*.f64 (/.f64 x-scale a) (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a) (neg.f64 x-scale)))
(/.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale)) (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale)))
(/.f64 (*.f64 (neg.f64 a) #s(literal 1 binary64)) (*.f64 (neg.f64 x-scale) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (*.f64 (neg.f64 a) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale)) (/.f64 x-scale (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (*.f64 (neg.f64 a) (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale)) (neg.f64 x-scale)))
(/.f64 (*.f64 (neg.f64 a) (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) (*.f64 (neg.f64 x-scale) (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale))))
(/.f64 (*.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (/.f64 a x-scale)) (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-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)))
(/.f64 (*.f64 (/.f64 a x-scale) #s(literal 1 binary64)) (*.f64 (*.f64 y-scale y-scale) (/.f64 x-scale (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (*.f64 (/.f64 a x-scale) (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale)))
(/.f64 (neg.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 b (*.f64 a a))))) (neg.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale))))
(/.f64 (neg.f64 (*.f64 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale) a))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) a)) (neg.f64 x-scale))
(/.f64 (neg.f64 (*.f64 a (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))))) (neg.f64 x-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) x-scale)) (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale)))
(pow.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) #s(literal -1 binary64))
(*.f64 a (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))
(*.f64 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)))
(*.f64 a (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 a (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))
(*.f64 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 a (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b (*.f64 b (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a (/.f64 a (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (/.f64 #s(literal 1 binary64) 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 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 a) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))
(*.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-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 a (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 b (*.f64 a a)))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-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)) 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 -4 binary64) b) (*.f64 b (/.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))
(*.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 (*.f64 b b) (/.f64 a (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))
(*.f64 (*.f64 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale) a)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) a) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (*.f64 a (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.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 a x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-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 x-scale x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (/.f64 a x-scale) x-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))
(*.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 x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale 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 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) x-scale) (/.f64 a (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (*.f64 x-scale y-scale)) (/.f64 a y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale))
(*.f64 (*.f64 (/.f64 a x-scale) (/.f64 a x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 y-scale y-scale)))
(*.f64 (*.f64 (/.f64 a x-scale) a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))) a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (/.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))))
(neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale))))
(neg.f64 (/.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (*.f64 y-scale y-scale))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #s(literal 1 binary64)))
(/.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (/.f64 x-scale a) (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale)) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) (neg.f64 (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale))))
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #s(literal -1 binary64))
(*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 a (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 y-scale y-scale))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 a x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 y-scale y-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 #s(literal 1 binary64) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 a x-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale) (/.f64 a (*.f64 y-scale y-scale)))
(*.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 (*.f64 b b) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 a (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale))
(*.f64 (/.f64 a y-scale) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale) y-scale))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (/.f64 a y-scale))
(*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) x-scale) (/.f64 (*.f64 b b) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) x-scale))
(*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) y-scale) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) a)
(*.f64 (*.f64 #s(literal -4 binary64) b) (*.f64 b a))
(*.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 b b))
(*.f64 (*.f64 a (*.f64 b b)) #s(literal -4 binary64))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b)
(*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)
#s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(literal 0 binary64)))
#s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(literal 0 binary64))
(exp.f64 (*.f64 (log.f64 angle) #s(literal 2 binary64)))
(pow.f64 angle #s(literal 2 binary64))
(*.f64 angle angle)
(*.f64 (pow.f64 angle #s(literal 1 binary64)) (pow.f64 angle #s(literal 1 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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))))
(neg.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale))))
(neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 x-scale a))
(/.f64 (/.f64 a x-scale) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))
(/.f64 (/.f64 a x-scale) (*.f64 (/.f64 x-scale (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 y-scale y-scale)))
(/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (*.f64 (/.f64 x-scale a) (*.f64 y-scale y-scale)))
(/.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 x-scale (*.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 x-scale)) (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-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 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale) a))))
(/.f64 #s(literal 1 binary64) (/.f64 x-scale (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) a)))
(/.f64 #s(literal 1 binary64) (/.f64 x-scale (*.f64 a (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) x-scale)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))))
(/.f64 (*.f64 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale) a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) a) x-scale)
(/.f64 (*.f64 a (/.f64 (*.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)))) x-scale) (*.f64 x-scale (*.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 y-scale y-scale)) (/.f64 x-scale a)))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #s(literal 1 binary64)) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a)))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) #s(literal 1 binary64)) (*.f64 (*.f64 y-scale y-scale) (/.f64 x-scale a)))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (neg.f64 a)) (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) a) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) x-scale))
(/.f64 (*.f64 #s(literal 1 binary64) a) (*.f64 (/.f64 x-scale (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 a)) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (neg.f64 x-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 a)) (*.f64 (/.f64 x-scale (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale))))
(/.f64 (*.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale)) (/.f64 x-scale a)))
(/.f64 (*.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #s(literal 1 binary64)) (*.f64 (neg.f64 x-scale) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a)))
(/.f64 (*.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (neg.f64 a)) (*.f64 (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale)) (neg.f64 x-scale)))
(/.f64 (*.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (neg.f64 a)) (*.f64 (neg.f64 x-scale) (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale))))
(/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 x-scale (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 (/.f64 x-scale a) (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a) x-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) (*.f64 (/.f64 x-scale a) (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a) (neg.f64 x-scale)))
(/.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale)) (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale)))
(/.f64 (*.f64 (neg.f64 a) #s(literal 1 binary64)) (*.f64 (neg.f64 x-scale) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (*.f64 (neg.f64 a) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale)) (/.f64 x-scale (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (*.f64 (neg.f64 a) (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale)) (neg.f64 x-scale)))
(/.f64 (*.f64 (neg.f64 a) (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) (*.f64 (neg.f64 x-scale) (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale))))
(/.f64 (*.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (/.f64 a x-scale)) (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-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)))
(/.f64 (*.f64 (/.f64 a x-scale) #s(literal 1 binary64)) (*.f64 (*.f64 y-scale y-scale) (/.f64 x-scale (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (*.f64 (/.f64 a x-scale) (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale)))
(/.f64 (neg.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 b (*.f64 a a))))) (neg.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale))))
(/.f64 (neg.f64 (*.f64 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale) a))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) a)) (neg.f64 x-scale))
(/.f64 (neg.f64 (*.f64 a (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))))) (neg.f64 x-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) x-scale)) (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale)))
(pow.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) #s(literal -1 binary64))
(*.f64 a (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))
(*.f64 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)))
(*.f64 a (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 a (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))
(*.f64 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 a (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b (*.f64 b (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a (/.f64 a (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (/.f64 #s(literal 1 binary64) 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 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 a) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))
(*.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-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 a (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 b (*.f64 a a)))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-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)) 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 -4 binary64) b) (*.f64 b (/.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))
(*.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 (*.f64 b b) (/.f64 a (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))
(*.f64 (*.f64 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale) a)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) a) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (*.f64 a (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.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 a x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-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 x-scale x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (/.f64 a x-scale) x-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))
(*.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 x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale 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 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) x-scale) (/.f64 a (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (*.f64 x-scale y-scale)) (/.f64 a y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale))
(*.f64 (*.f64 (/.f64 a x-scale) (/.f64 a x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 y-scale y-scale)))
(*.f64 (*.f64 (/.f64 a x-scale) a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))) a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (/.f64 #s(literal 1 binary64) x-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 b b) (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(*.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 #s(literal -4 binary64) b) (*.f64 b (*.f64 a a)))
(*.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 b)) #s(literal -4 binary64))
(*.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) b)) b)
(neg.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale))))
(neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 x-scale a))
(/.f64 (/.f64 a x-scale) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))
(/.f64 (/.f64 a x-scale) (*.f64 (/.f64 x-scale (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 y-scale y-scale)))
(/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (*.f64 (/.f64 x-scale a) (*.f64 y-scale y-scale)))
(/.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 x-scale (*.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 x-scale)) (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-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 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale) a))))
(/.f64 #s(literal 1 binary64) (/.f64 x-scale (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) a)))
(/.f64 #s(literal 1 binary64) (/.f64 x-scale (*.f64 a (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) x-scale)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))))
(/.f64 (*.f64 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale) a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) a) x-scale)
(/.f64 (*.f64 a (/.f64 (*.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)))) x-scale) (*.f64 x-scale (*.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 y-scale y-scale)) (/.f64 x-scale a)))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #s(literal 1 binary64)) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a)))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) #s(literal 1 binary64)) (*.f64 (*.f64 y-scale y-scale) (/.f64 x-scale a)))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (neg.f64 a)) (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) a) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) x-scale))
(/.f64 (*.f64 #s(literal 1 binary64) a) (*.f64 (/.f64 x-scale (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 a)) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (neg.f64 x-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 a)) (*.f64 (/.f64 x-scale (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale))))
(/.f64 (*.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale)) (/.f64 x-scale a)))
(/.f64 (*.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #s(literal 1 binary64)) (*.f64 (neg.f64 x-scale) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a)))
(/.f64 (*.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (neg.f64 a)) (*.f64 (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale)) (neg.f64 x-scale)))
(/.f64 (*.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (neg.f64 a)) (*.f64 (neg.f64 x-scale) (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale))))
(/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 x-scale (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 (/.f64 x-scale a) (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a) x-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) (*.f64 (/.f64 x-scale a) (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a) (neg.f64 x-scale)))
(/.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale)) (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale)))
(/.f64 (*.f64 (neg.f64 a) #s(literal 1 binary64)) (*.f64 (neg.f64 x-scale) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (*.f64 (neg.f64 a) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale)) (/.f64 x-scale (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (*.f64 (neg.f64 a) (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale)) (neg.f64 x-scale)))
(/.f64 (*.f64 (neg.f64 a) (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) (*.f64 (neg.f64 x-scale) (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale))))
(/.f64 (*.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (/.f64 a x-scale)) (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-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)))
(/.f64 (*.f64 (/.f64 a x-scale) #s(literal 1 binary64)) (*.f64 (*.f64 y-scale y-scale) (/.f64 x-scale (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (*.f64 (/.f64 a x-scale) (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale)))
(/.f64 (neg.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 b (*.f64 a a))))) (neg.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale))))
(/.f64 (neg.f64 (*.f64 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale) a))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) a)) (neg.f64 x-scale))
(/.f64 (neg.f64 (*.f64 a (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))))) (neg.f64 x-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) x-scale)) (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale)))
(pow.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) #s(literal -1 binary64))
(*.f64 a (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))
(*.f64 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)))
(*.f64 a (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 a (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))
(*.f64 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 a (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b (*.f64 b (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a (/.f64 a (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (/.f64 #s(literal 1 binary64) 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 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 a) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))
(*.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-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 a (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 b (*.f64 a a)))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-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)) 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 -4 binary64) b) (*.f64 b (/.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))
(*.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 (*.f64 b b) (/.f64 a (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))
(*.f64 (*.f64 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale) a)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) a) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (*.f64 a (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.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 a x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-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 x-scale x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (/.f64 a x-scale) x-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))
(*.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 x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale 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 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) x-scale) (/.f64 a (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (*.f64 x-scale y-scale)) (/.f64 a y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale))
(*.f64 (*.f64 (/.f64 a x-scale) (/.f64 a x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 y-scale y-scale)))
(*.f64 (*.f64 (/.f64 a x-scale) a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))) a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (/.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))))
(neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (neg.f64 x-scale)))
(neg.f64 (/.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) x-scale))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale)
(/.f64 #s(literal 1 binary64) (/.f64 x-scale (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 x-scale (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #s(literal 1 binary64)))
(/.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (neg.f64 x-scale))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 x-scale (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) (neg.f64 (neg.f64 x-scale)))
(pow.f64 (/.f64 x-scale (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #s(literal -1 binary64))
(*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a x-scale))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale))
(*.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale)))
(*.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 (*.f64 b b) (/.f64 #s(literal 1 binary64) x-scale)))
(-.f64 #s(literal 0 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 x-scale x-scale))))
(neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 x-scale x-scale))))
(neg.f64 (*.f64 (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))))))))
(*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale))))
(*.f64 (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))
(*.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 x-scale x-scale))))
(*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))))))))
(*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 x-scale x-scale)))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) #s(literal -1 binary64)) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 x-scale x-scale)))
(*.f64 (*.f64 (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))
(+.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #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 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))
(-.f64 (/.f64 #s(literal 1/8 binary64) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 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))))) (/.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))) #s(literal 3 binary64)) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 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))))))
(-.f64 (/.f64 #s(literal 1/4 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))) (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)) #s(literal 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))))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 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))
(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 #s(literal -1 binary64) (*.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 (neg.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 binary64) (/.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 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)))) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)) (-.f64 (*.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/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)) #s(literal 3 binary64)))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)) (-.f64 (*.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 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 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)))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)) #s(literal 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)))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (-.f64 (*.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 (cos.f64 (-.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))) (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) (cos.f64 (fma.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)) (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 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))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)) #s(literal 2 binary64)))) (neg.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 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)) (-.f64 (*.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 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 (*.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 (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 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)) (-.f64 (*.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 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 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))))))
(*.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 1 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))))
(*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 1 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 1 binary64)))
(neg.f64 (/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale))))) (neg.f64 y-scale)))
(neg.f64 (/.f64 (neg.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))))) y-scale))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale))))) y-scale)
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 y-scale (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))))) #s(literal 1 binary64)))
(/.f64 (neg.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))))) (neg.f64 y-scale))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 y-scale (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale))))))))
(/.f64 (*.f64 (fma.f64 #s(literal 64 binary64) (pow.f64 (*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))) #s(literal 3 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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 x-scale x-scale))))) y-scale))
(/.f64 (*.f64 (-.f64 (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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 x-scale x-scale)) #s(literal 2 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 x-scale x-scale))) (*.f64 (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) y-scale))
(/.f64 (neg.f64 (neg.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale))))))) y-scale)
(pow.f64 (/.f64 y-scale (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))))) #s(literal -1 binary64))
(*.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale))))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale))))) y-scale))
(*.f64 (neg.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))))) (/.f64 #s(literal -1 binary64) y-scale))
(-.f64 #s(literal 0 binary64) (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale))))) y-scale)) y-scale))
(neg.f64 (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale))))) y-scale)) y-scale))
(/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 y-scale) #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale))))) y-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (neg.f64 y-scale) #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale))))) y-scale))) #s(literal 1 binary64)))
(/.f64 (neg.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale))))) y-scale))) y-scale)
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (neg.f64 y-scale) #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale))))) y-scale)))))
(/.f64 (neg.f64 (neg.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale))))) y-scale)))) (neg.f64 y-scale))
(pow.f64 (/.f64 (neg.f64 y-scale) #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale))))) y-scale))) #s(literal -1 binary64))
(*.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale))))) y-scale)) (/.f64 #s(literal -1 binary64) y-scale))
(*.f64 #s(literal 1 binary64) (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale))))) y-scale)) (neg.f64 y-scale)))
(*.f64 (neg.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale))))) y-scale))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 #s(literal -1 binary64) (/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale))))) y-scale)) y-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)
(+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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 x-scale x-scale)))
(+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))))
(-.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 x-scale x-scale))))
(-.f64 (/.f64 (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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 x-scale x-scale)) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 x-scale x-scale))) (*.f64 (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))))))))) (/.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 x-scale x-scale))) (*.f64 (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))))))))))
(fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))))
(fma.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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 x-scale x-scale)))
(fma.f64 (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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 x-scale x-scale)))
(fma.f64 (fma.f64 a (*.f64 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 #s(literal 4 binary64) (/.f64 (fma.f64 a (*.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 (*.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 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))))
(fma.f64 (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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 #s(literal 1 binary64) (*.f64 x-scale x-scale)) #s(literal 4 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))))
(fma.f64 (*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 x-scale x-scale))) #s(literal 4 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))))
(fma.f64 (/.f64 (fma.f64 a (*.f64 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)))) x-scale) (*.f64 (/.f64 (fma.f64 a (*.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 (*.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)))) x-scale) #s(literal 4 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))))
(fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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 x-scale x-scale)))
(fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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 x-scale x-scale)))
(fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))))
(fma.f64 (/.f64 #s(literal 4 binary64) x-scale) (/.f64 (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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))))) x-scale) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))))
(fma.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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 x-scale x-scale)))
(fma.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))))
(fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 a (*.f64 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)))) x-scale)) (/.f64 (fma.f64 a (*.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 (*.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)))) x-scale) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) #s(literal -1 binary64)) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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 x-scale x-scale)))
(fma.f64 (*.f64 (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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 x-scale x-scale)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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 x-scale x-scale))))) (fma.f64 #s(literal 64 binary64) (pow.f64 (*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 x-scale x-scale))) (*.f64 (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (-.f64 (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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 x-scale x-scale)) #s(literal 2 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 64 binary64) (pow.f64 (*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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 x-scale x-scale))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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 x-scale x-scale)) #s(literal 2 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 x-scale x-scale))) (*.f64 (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))))
(/.f64 (neg.f64 (fma.f64 #s(literal 64 binary64) (pow.f64 (*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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 x-scale x-scale)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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 x-scale x-scale)) #s(literal 2 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 x-scale x-scale))) (*.f64 (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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 x-scale x-scale)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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 x-scale x-scale))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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 x-scale x-scale))))
(*.f64 (fma.f64 #s(literal 64 binary64) (pow.f64 (*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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 x-scale x-scale)))))))
(*.f64 (-.f64 (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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 x-scale x-scale)) #s(literal 2 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 x-scale x-scale))) (*.f64 (/.f64 (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))))))))))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))) #s(literal 1 binary64)))
(sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))
(pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1 binary64))
(*.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 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/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)))))
(+.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)) (neg.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 (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 (neg.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))))))
(cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))
(-.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)) (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 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #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)))) (*.f64 (neg.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))))))
(fma.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 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))))) (neg.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))))
(fma.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 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))))) (*.f64 (neg.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))))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/4 binary64))))) (neg.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))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/4 binary64))))) (*.f64 (neg.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))))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 1 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))) (neg.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))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 1 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))) (*.f64 (neg.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))))))
(fma.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 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))) (neg.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))))
(fma.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 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))) (*.f64 (neg.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))))))
(fma.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 1 binary64)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 1 binary64)) (neg.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))))
(fma.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 1 binary64)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 1 binary64)) (*.f64 (neg.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))))))
(fma.f64 (+.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64) (neg.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))))
(fma.f64 (+.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (neg.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 (pow.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 3 binary64)) (pow.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 3 binary64))) (fma.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)) (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 (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 angle (*.f64 (PI.f64) #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 angle (*.f64 (PI.f64) #s(literal 1/90 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))))))
(/.f64 (-.f64 (*.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)) (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 (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 angle (*.f64 (PI.f64) #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 angle (*.f64 (PI.f64) #s(literal 1/90 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))))
(*.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))))))
(neg.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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))))) (neg.f64 (*.f64 x-scale x-scale))))
(neg.f64 (/.f64 (*.f64 (fma.f64 a (*.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 (*.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)))) (neg.f64 (fma.f64 a (*.f64 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 x-scale x-scale)))
(/.f64 (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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 x-scale x-scale))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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)))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 x-scale (/.f64 (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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))))) x-scale)))
(/.f64 (*.f64 (fma.f64 a (*.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 (*.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)))) (neg.f64 (fma.f64 a (*.f64 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)))))) (neg.f64 (*.f64 x-scale x-scale)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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 (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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))))) x-scale) x-scale)
(/.f64 (*.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))) (fma.f64 a (*.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 (*.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 (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 4 binary64)) (*.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 (*.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 x-scale x-scale)))
(/.f64 (*.f64 (-.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))) (fma.f64 a (*.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 (*.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 (*.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 (*.f64 (fma.f64 a (*.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 (*.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)))) (neg.f64 (fma.f64 a (*.f64 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))))))) (neg.f64 (neg.f64 (*.f64 x-scale x-scale))))
(/.f64 (neg.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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))))) x-scale)) (neg.f64 x-scale))
(pow.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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)))))) #s(literal -1 binary64))
(*.f64 (/.f64 (fma.f64 a (*.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 (*.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)))) x-scale) (/.f64 (fma.f64 a (*.f64 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)))) x-scale))
(*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 x-scale x-scale)))
(*.f64 (fma.f64 a (*.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 (*.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 (fma.f64 a (*.f64 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 #s(literal 1 binary64) (*.f64 x-scale x-scale))))
(*.f64 (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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 #s(literal 1 binary64) (*.f64 x-scale x-scale)))
(*.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a (*.f64 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 (fma.f64 a (*.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 (*.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 x-scale x-scale))))
(*.f64 (*.f64 (fma.f64 a (*.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 (*.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)))) (neg.f64 (fma.f64 a (*.f64 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 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale x-scale))))
(*.f64 (/.f64 (fma.f64 a (*.f64 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)))) x-scale) (/.f64 (fma.f64 a (*.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 (*.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)))) x-scale))
(*.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 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 a (*.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 (*.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))))) x-scale) (/.f64 #s(literal 1 binary64) x-scale))

eval318.0ms (0.2%)

Memory
-1.0MiB live, 943.8MiB allocated
Compiler

Compiled 107 565 to 3 458 computations (96.8% saved)

prune23.8s (16.9%)

Memory
-82.2MiB live, 75 199.6MiB allocated
Pruning

21 alts after pruning (21 fresh and 0 done)

PrunedKeptTotal
New1 708131 721
Fresh8816
Picked505
Done000
Total1 721211 742
Accuracy
89.2%
Counts
1 742 → 21
Alt Table
Click to see full alt table
StatusAccuracyProgram
54.9%
(/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 x-scale x-scale) y-scale))) (neg.f64 y-scale))
34.5%
(/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 #s(approx (+ (* 4 (/ (* (+ (* (* b b) (+ 1/2 (* (cos (* (* angle (PI)) 1/90)) -1/2))) (* (* a a) (+ (* 1/2 (cos (* (* angle (PI)) 1/90))) 1/2))) (+ (* (* a a) (+ 1/2 (* (cos (* (* angle (PI)) 1/90)) -1/2))) (* (* b b) (+ (* 1/2 (cos (* (* angle (PI)) 1/90))) 1/2)))) (* x-scale x-scale))) (* (pow (sin (* (* angle (PI)) 1/90)) 2) (neg (/ (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (* x-scale x-scale))))) (-.f64 (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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 x-scale x-scale))))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) y-scale)) (neg.f64 y-scale))
33.0%
(/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (-.f64 (fma.f64 b (fma.f64 b (fma.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)) 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)) y-scale))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (neg.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) y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 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 #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) y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 y-scale))
67.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 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
60.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 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))
59.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 y-scale) (*.f64 x-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 a #s(literal 1 binary64)) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))))
72.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (*.f64 x-scale y-scale)) (/.f64 a y-scale)))
70.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 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)))
70.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 (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))))
68.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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)))
74.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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)))
68.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 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 (*.f64 x-scale y-scale) y-scale))))
47.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 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 y-scale y-scale))))
62.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 #s(literal -4 binary64) x-scale) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale)))))
70.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 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)))
69.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 y-scale) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale) y-scale)) (/.f64 a x-scale)))
63.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 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
62.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
34.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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))))
Compiler

Compiled 1 398 to 720 computations (48.5% saved)

simplify204.0ms (0.1%)

Memory
7.0MiB live, 521.5MiB allocated
Algorithm
egg-herbie
Localize:

Found 19 expressions of interest:

NewMetricScoreProgram
cost-diff0
(/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)))
cost-diff384
(*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale))
cost-diff384
(*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))
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 (*.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 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)))
cost-diff384
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))
cost-diff0
(*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64)))
cost-diff0
(*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b)
cost-diff0
(/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
cost-diff0
#s(approx (* (* angle angle) 0) #s(literal 0 binary64))
cost-diff0
#s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))))
cost-diff0
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)))
cost-diff384
(/.f64 (/.f64 a x-scale) y-scale)
cost-diff384
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale))
Rules
6 226×lower-*.f32
6 194×lower-*.f64
5 250×lower-fma.f64
5 250×lower-fma.f32
3 752×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01111098
01371086
13701086
216471076
354301076
463201076
081691061
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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 x-scale y-scale)
x-scale
y-scale
(/.f64 (/.f64 a x-scale) y-scale)
(/.f64 a 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))))
#s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64)))
#s(approx (* (* angle angle) 0) #s(literal 0 binary64))
#s(literal 0 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 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 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))))
(*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b)
(*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64)))
(*.f64 a a)
a
(*.f64 b #s(literal -4 binary64))
b
#s(literal -4 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 (*.f64 x-scale y-scale) y-scale)
(*.f64 x-scale y-scale)
x-scale
y-scale
(/.f64 a 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 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)))
(*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))
(*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale))
(/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale))
(*.f64 a #s(literal -4 binary64))
a
#s(literal -4 binary64)
(*.f64 x-scale y-scale)
x-scale
y-scale
(/.f64 (*.f64 b b) y-scale)
(*.f64 b b)
b
(/.f64 a x-scale)
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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale))
(/.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))
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 x-scale y-scale)
x-scale
y-scale
(/.f64 (/.f64 a x-scale) y-scale)
(/.f64 a (*.f64 x-scale y-scale))
(/.f64 a 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))))
#s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64)))
#s(approx (* (* angle angle) 0) #s(literal 0 binary64))
#s(literal 0 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 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-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))))
(/.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b)
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))))
(*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64)))
(*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))
(*.f64 a a)
a
(*.f64 b #s(literal -4 binary64))
b
#s(literal -4 binary64)
(*.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(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a 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 b (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))
(/.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale y-scale)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))
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 (*.f64 x-scale y-scale) y-scale)
(*.f64 y-scale (*.f64 x-scale y-scale))
(*.f64 x-scale y-scale)
x-scale
y-scale
(/.f64 a 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 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a 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 b (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))
(/.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale))
(*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 a #s(literal -4 binary64))
a
#s(literal -4 binary64)
(*.f64 x-scale y-scale)
x-scale
y-scale
(/.f64 (*.f64 b b) y-scale)
(*.f64 b b)
b
(/.f64 a x-scale)

localize529.0ms (0.4%)

Memory
6.4MiB live, 1 848.9MiB allocated
Localize:

Found 19 expressions of interest:

NewMetricScoreProgram
accuracy2.8450355623483703
(/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale))
accuracy5.663254913631548
(*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))
accuracy7.705966613420097
(/.f64 (*.f64 b b) y-scale)
accuracy9.348927507397262
(*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale))
accuracy0.12109375
(*.f64 (*.f64 x-scale y-scale) y-scale)
accuracy5.663254913631548
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))
accuracy7.116673893361206
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
accuracy11.97009800842973
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale))
accuracy3.52924945075122
(*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b)
accuracy6.826899662987418
(*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64)))
accuracy7.663058141975959
(*.f64 x-scale (*.f64 y-scale y-scale))
accuracy13.28081864789554
(/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
accuracy0
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))))
accuracy0
#s(approx (* (* angle angle) 0) #s(literal 0 binary64))
accuracy36.875684983472226
#s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64)))
accuracy3.931379354076638
(/.f64 (/.f64 a x-scale) y-scale)
accuracy5.7014458698364825
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale))
accuracy7.116673893361206
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
accuracy8.357997439363913
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
Samples
267.0ms127×1valid
63.0ms86×0valid
58.0ms23×2valid
18.0ms20×1exit
Compiler

Compiled 900 to 100 computations (88.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 361.0ms
ival-mult: 138.0ms (38.3% of total)
ival-div: 50.0ms (13.9% of total)
ival-cos: 36.0ms (10% of total)
ival-sin: 34.0ms (9.4% of total)
const: 33.0ms (9.2% of total)
ival-pow2: 23.0ms (6.4% of total)
adjust: 19.0ms (5.3% of total)
ival-add: 18.0ms (5% of total)
ival-sub: 7.0ms (1.9% of total)
ival-pi: 2.0ms (0.6% of total)
exact: 1.0ms (0.3% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series134.0ms (0.1%)

Memory
20.5MiB live, 459.0MiB allocated
Counts
22 → 924
Calls
Call 1
Inputs
#s(alt (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64)))) #<representation binary64>) () ())
#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())
#s(alt #s(approx (* (* angle angle) 0) #s(literal 0 binary64)) (patch #s(approx (* (* angle angle) 0) #s(literal 0 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 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) 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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a #s(literal -4 binary64)) (*.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 (*.f64 x-scale y-scale) y-scale) (patch (*.f64 (*.f64 x-scale y-scale) y-scale) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 b b) y-scale) (patch (/.f64 (*.f64 b b) y-scale) #<representation binary64>) () ())
Outputs
#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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.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 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 (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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 (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<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) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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 #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<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) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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 #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<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) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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 #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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 inf angle) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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 inf angle) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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 inf angle) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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 inf angle) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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 -inf angle) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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 -inf angle) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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 -inf angle) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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 -inf angle) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor 0 b) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/8100 (/ (* (pow angle 2) (* b (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* b (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* b (+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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) (+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* b (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* b (+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow angle 2) (* b (* (pow (PI) 2) (+ (* -2 a) (* 2 a))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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) (+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (* (pow b 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (taylor inf b) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -4 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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)))))) (taylor inf b) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -4 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow b 3) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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))))))) (taylor inf b) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (* (pow b 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (taylor -inf b) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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))))))) b)) (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2))))) b)) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (taylor -inf b) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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)))))))) b)) (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2))))) b)) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (taylor -inf b) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor 0 a) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/8100 (/ (* a (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* a (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* a (+ (* -4 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* a (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* a (+ (* -4 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* a (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (taylor inf a) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -4 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow a 2)))))) (taylor inf a) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -4 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow a 3) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow a 2))))))) (taylor inf a) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (taylor -inf a) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) a)) (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2))))) a)) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (taylor -inf a) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) a)) (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2))))) a)) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (taylor -inf a) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 y-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 y-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 y-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 y-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) (patch #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 angle) (#s(alt #s(approx (* (* angle angle) 0) #s(literal 0 binary64)) (patch #s(approx (* (* angle angle) 0) #s(literal 0 binary64)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 angle) (#s(alt #s(approx (* (* angle angle) 0) #s(literal 0 binary64)) (patch #s(approx (* (* angle angle) 0) #s(literal 0 binary64)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 angle) (#s(alt #s(approx (* (* angle angle) 0) #s(literal 0 binary64)) (patch #s(approx (* (* angle angle) 0) #s(literal 0 binary64)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 angle) (#s(alt #s(approx (* (* angle angle) 0) #s(literal 0 binary64)) (patch #s(approx (* (* angle angle) 0) #s(literal 0 binary64)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf angle) (#s(alt #s(approx (* (* angle angle) 0) #s(literal 0 binary64)) (patch #s(approx (* (* angle angle) 0) #s(literal 0 binary64)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf angle) (#s(alt #s(approx (* (* angle angle) 0) #s(literal 0 binary64)) (patch #s(approx (* (* angle angle) 0) #s(literal 0 binary64)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf angle) (#s(alt #s(approx (* (* angle angle) 0) #s(literal 0 binary64)) (patch #s(approx (* (* angle angle) 0) #s(literal 0 binary64)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf angle) (#s(alt #s(approx (* (* angle angle) 0) #s(literal 0 binary64)) (patch #s(approx (* (* angle angle) 0) #s(literal 0 binary64)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf angle) (#s(alt #s(approx (* (* angle angle) 0) #s(literal 0 binary64)) (patch #s(approx (* (* angle angle) 0) #s(literal 0 binary64)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf angle) (#s(alt #s(approx (* (* angle angle) 0) #s(literal 0 binary64)) (patch #s(approx (* (* angle angle) 0) #s(literal 0 binary64)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf angle) (#s(alt #s(approx (* (* angle angle) 0) #s(literal 0 binary64)) (patch #s(approx (* (* angle angle) 0) #s(literal 0 binary64)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf angle) (#s(alt #s(approx (* (* angle angle) 0) #s(literal 0 binary64)) (patch #s(approx (* (* angle angle) 0) #s(literal 0 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 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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))))) #<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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.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 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor 0 a) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor 0 a) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor 0 a) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor 0 a) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor inf a) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor inf a) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor inf a) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor inf a) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor -inf a) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor -inf a) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor -inf a) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor -inf a) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor 0 b) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor 0 b) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor 0 b) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor 0 b) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor inf b) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor inf b) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor inf b) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor inf b) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor -inf b) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor -inf b) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor -inf b) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor -inf b) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) (patch (*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (patch (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) 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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ a (* x-scale y-scale))) (taylor 0 a) (#s(alt (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ a (* x-scale y-scale))) (taylor 0 a) (#s(alt (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ a (* x-scale y-scale))) (taylor 0 a) (#s(alt (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ a (* x-scale y-scale))) (taylor 0 a) (#s(alt (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ a (* x-scale y-scale))) (taylor inf a) (#s(alt (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ a (* x-scale y-scale))) (taylor inf a) (#s(alt (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ a (* x-scale y-scale))) (taylor inf a) (#s(alt (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ a (* x-scale y-scale))) (taylor inf a) (#s(alt (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ a (* x-scale y-scale))) (taylor -inf a) (#s(alt (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ a (* x-scale y-scale))) (taylor -inf a) (#s(alt (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ a (* x-scale y-scale))) (taylor -inf a) (#s(alt (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ a (* x-scale y-scale))) (taylor -inf a) (#s(alt (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ a (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ a (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ a (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ a (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ a (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ a (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ a (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ a (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ a (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ a (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ a (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ a (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ a (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ a (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ a (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ a (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ a (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ a (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ a (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ a (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ a (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ a (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ a (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ a (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a #s(literal -4 binary64)) (*.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 (* x-scale (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) y-scale) (patch (*.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 (*.f64 x-scale y-scale) y-scale) (patch (*.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 (*.f64 x-scale y-scale) y-scale) (patch (*.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 (*.f64 x-scale y-scale) y-scale) (patch (*.f64 (*.f64 x-scale y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) y-scale) (patch (*.f64 (*.f64 x-scale y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) y-scale) (patch (*.f64 (*.f64 x-scale y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) y-scale) (patch (*.f64 (*.f64 x-scale y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) y-scale) (patch (*.f64 (*.f64 x-scale y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) y-scale) (patch (*.f64 (*.f64 x-scale y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) y-scale) (patch (*.f64 (*.f64 x-scale y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) y-scale) (patch (*.f64 (*.f64 x-scale y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) y-scale) (patch (*.f64 (*.f64 x-scale y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) y-scale) (patch (*.f64 (*.f64 x-scale y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) y-scale) (patch (*.f64 (*.f64 x-scale y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) y-scale) (patch (*.f64 (*.f64 x-scale y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) y-scale) (patch (*.f64 (*.f64 x-scale y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) y-scale) (patch (*.f64 (*.f64 x-scale y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) y-scale) (patch (*.f64 (*.f64 x-scale y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) y-scale) (patch (*.f64 (*.f64 x-scale y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) y-scale) (patch (*.f64 (*.f64 x-scale y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) y-scale) (patch (*.f64 (*.f64 x-scale y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) y-scale) (patch (*.f64 (*.f64 x-scale y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) y-scale) (patch (*.f64 (*.f64 x-scale y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) y-scale) (patch (*.f64 (*.f64 x-scale y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow b 2) y-scale) (taylor 0 b) (#s(alt (/.f64 (*.f64 b b) y-scale) (patch (/.f64 (*.f64 b b) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow b 2) y-scale) (taylor 0 b) (#s(alt (/.f64 (*.f64 b b) y-scale) (patch (/.f64 (*.f64 b b) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow b 2) y-scale) (taylor 0 b) (#s(alt (/.f64 (*.f64 b b) y-scale) (patch (/.f64 (*.f64 b b) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow b 2) y-scale) (taylor 0 b) (#s(alt (/.f64 (*.f64 b b) y-scale) (patch (/.f64 (*.f64 b b) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow b 2) y-scale) (taylor inf b) (#s(alt (/.f64 (*.f64 b b) y-scale) (patch (/.f64 (*.f64 b b) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow b 2) y-scale) (taylor inf b) (#s(alt (/.f64 (*.f64 b b) y-scale) (patch (/.f64 (*.f64 b b) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow b 2) y-scale) (taylor inf b) (#s(alt (/.f64 (*.f64 b b) y-scale) (patch (/.f64 (*.f64 b b) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow b 2) y-scale) (taylor inf b) (#s(alt (/.f64 (*.f64 b b) y-scale) (patch (/.f64 (*.f64 b b) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow b 2) y-scale) (taylor -inf b) (#s(alt (/.f64 (*.f64 b b) y-scale) (patch (/.f64 (*.f64 b b) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow b 2) y-scale) (taylor -inf b) (#s(alt (/.f64 (*.f64 b b) y-scale) (patch (/.f64 (*.f64 b b) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow b 2) y-scale) (taylor -inf b) (#s(alt (/.f64 (*.f64 b b) y-scale) (patch (/.f64 (*.f64 b b) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow b 2) y-scale) (taylor -inf b) (#s(alt (/.f64 (*.f64 b b) y-scale) (patch (/.f64 (*.f64 b b) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow b 2) y-scale) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 b b) y-scale) (patch (/.f64 (*.f64 b b) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow b 2) y-scale) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 b b) y-scale) (patch (/.f64 (*.f64 b b) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow b 2) y-scale) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 b b) y-scale) (patch (/.f64 (*.f64 b b) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow b 2) y-scale) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 b b) y-scale) (patch (/.f64 (*.f64 b b) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow b 2) y-scale) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 b b) y-scale) (patch (/.f64 (*.f64 b b) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow b 2) y-scale) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 b b) y-scale) (patch (/.f64 (*.f64 b b) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow b 2) y-scale) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 b b) y-scale) (patch (/.f64 (*.f64 b b) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow b 2) y-scale) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 b b) y-scale) (patch (/.f64 (*.f64 b b) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow b 2) y-scale) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 b b) y-scale) (patch (/.f64 (*.f64 b b) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow b 2) y-scale) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 b b) y-scale) (patch (/.f64 (*.f64 b b) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow b 2) y-scale) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 b b) y-scale) (patch (/.f64 (*.f64 b b) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow b 2) y-scale) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 b b) y-scale) (patch (/.f64 (*.f64 b b) y-scale) #<representation binary64>) () ())) ())
Calls

231 calls:

TimeVariablePointExpression
2.0ms
a
@0
(/ (* a (* -4 (* b b))) (* x-scale y-scale))
2.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)))
1.0ms
b
@0
(/ (* a (* -4 (* b b))) (* x-scale y-scale))
1.0ms
a
@-inf
(- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)))
1.0ms
a
@inf
(/ (/ a x-scale) y-scale)

simplify475.0ms (0.3%)

Memory
-8.3MiB live, 1 344.8MiB allocated
Algorithm
egg-herbie
Rules
15 566×lower-fma.f64
15 566×lower-fma.f32
8 122×lower-*.f64
8 122×lower-*.f32
2 736×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
046440774
1175838316
0873437446
Stop Event
iter limit
node limit
Counts
924 → 924
Calls
Call 1
Inputs
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 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))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (/ (* 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))
(* -4 (/ (* (pow a 2) (pow b 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) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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) (+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(+ (* 1/8100 (/ (* (pow angle 2) (* b (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(+ (* b (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* b (+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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) (+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(+ (* b (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* b (+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow angle 2) (* b (* (pow (PI) 2) (+ (* -2 a) (* 2 a))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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) (+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow angle 2) (* (pow b 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 4) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(* (pow b 4) (+ (* -4 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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))))))
(* (pow b 4) (+ (* -4 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow b 3) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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)))))))
(* (pow angle 2) (* (pow b 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 4) (+ (* -1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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))))))) b)) (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2))))) b)) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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)))))))) b)) (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2))))) b)) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(* (pow angle 2) (+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(+ (* 1/8100 (/ (* a (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(+ (* a (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* a (+ (* -4 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(+ (* a (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* a (+ (* -4 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* a (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 4) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 4) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(* (pow a 4) (+ (* -4 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow a 2))))))
(* (pow a 4) (+ (* -4 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow a 3) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow a 2)))))))
(* (pow a 4) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 4) (+ (* -1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) a)) (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2))))) a)) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) a)) (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2))))) a)) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-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 angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (pow y-scale 2))
0
0
0
0
0
0
0
0
0
0
0
0
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) 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 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (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 a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (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)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* a (pow b 2)) (* x-scale (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 (/ a (* x-scale y-scale)))
(* -4 (/ a (* x-scale y-scale)))
(* -4 (/ a (* x-scale y-scale)))
(* -4 (/ a (* x-scale y-scale)))
(* -4 (/ a (* x-scale y-scale)))
(* -4 (/ a (* x-scale y-scale)))
(* -4 (/ a (* x-scale y-scale)))
(* -4 (/ a (* x-scale y-scale)))
(* -4 (/ a (* x-scale y-scale)))
(* -4 (/ a (* x-scale y-scale)))
(* -4 (/ a (* x-scale y-scale)))
(* -4 (/ a (* x-scale y-scale)))
(* -4 (/ a (* x-scale y-scale)))
(* -4 (/ a (* x-scale y-scale)))
(* -4 (/ a (* x-scale y-scale)))
(* -4 (/ a (* x-scale y-scale)))
(* -4 (/ a (* x-scale y-scale)))
(* -4 (/ a (* x-scale y-scale)))
(* -4 (/ a (* x-scale y-scale)))
(* -4 (/ a (* x-scale y-scale)))
(* -4 (/ a (* x-scale y-scale)))
(* -4 (/ a (* x-scale y-scale)))
(* -4 (/ a (* x-scale y-scale)))
(* -4 (/ a (* x-scale y-scale)))
(* -4 (/ a (* x-scale y-scale)))
(* -4 (/ a (* x-scale y-scale)))
(* -4 (/ a (* x-scale y-scale)))
(* -4 (/ a (* x-scale y-scale)))
(* -4 (/ a (* x-scale y-scale)))
(* -4 (/ a (* x-scale y-scale)))
(* -4 (/ a (* x-scale y-scale)))
(* -4 (/ a (* x-scale y-scale)))
(* -4 (/ a (* x-scale y-scale)))
(* -4 (/ a (* x-scale y-scale)))
(* -4 (/ a (* x-scale y-scale)))
(* -4 (/ a (* 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))
(* 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 b 2) y-scale)
(/ (pow b 2) y-scale)
(/ (pow b 2) y-scale)
(/ (pow b 2) y-scale)
(/ (pow b 2) y-scale)
(/ (pow b 2) y-scale)
(/ (pow b 2) y-scale)
(/ (pow b 2) y-scale)
(/ (pow b 2) y-scale)
(/ (pow b 2) y-scale)
(/ (pow b 2) y-scale)
(/ (pow b 2) y-scale)
(/ (pow b 2) y-scale)
(/ (pow b 2) y-scale)
(/ (pow b 2) y-scale)
(/ (pow b 2) y-scale)
(/ (pow b 2) y-scale)
(/ (pow b 2) y-scale)
(/ (pow b 2) y-scale)
(/ (pow b 2) y-scale)
(/ (pow b 2) y-scale)
(/ (pow b 2) y-scale)
(/ (pow b 2) y-scale)
(/ (pow b 2) y-scale)
Outputs
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.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 (*.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 b 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 b b) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 b 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 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 a #s(literal 1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64)))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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)))))) (* (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 angle angle) #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 a (*.f64 a #s(literal -1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 (*.f64 b 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 a (*.f64 a #s(literal 1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 b 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 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 b b))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.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 (*.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 b 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 b b) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 b 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 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 a #s(literal 1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64)))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.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 (*.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 b 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 b b) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 b 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 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 a #s(literal 1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64)))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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)))))) (* (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 angle angle) #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 a (*.f64 a #s(literal -1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 (*.f64 b 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 a (*.f64 a #s(literal 1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 b 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 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 b b))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.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 (*.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 b 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 b b) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 b 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 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 a #s(literal 1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64)))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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)))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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 -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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)))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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 -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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)))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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 -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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))))))
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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)))))))
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (+.f64 (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 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 a (*.f64 a (*.f64 b b))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 angle angle)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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)))))))
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (+.f64 (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 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 a (*.f64 a (*.f64 b b))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 angle angle)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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)))))))
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (+.f64 (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 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 a (*.f64 a (*.f64 b b))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 angle angle)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 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))))))
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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)))))))
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (+.f64 (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 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 a (*.f64 a (*.f64 b b))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 angle angle)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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)))))))
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (+.f64 (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 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 a (*.f64 a (*.f64 b b))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 angle angle)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow angle 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)))))))
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (+.f64 (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 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 a (*.f64 a (*.f64 b b))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 angle angle)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(* (pow angle 2) (+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (*.f64 angle angle) #s(literal 0 binary64))
(+ (* 1/8100 (/ (* (pow angle 2) (* b (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 angle (*.f64 angle #s(literal 0 binary64)) (*.f64 (*.f64 angle angle) #s(literal 0 binary64)))
(+ (* b (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* b (+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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) (+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 b (fma.f64 b (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 #s(literal 1/4050 binary64) (*.f64 a a)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64)))
(+ (* b (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* b (+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow angle 2) (* b (* (pow (PI) 2) (+ (* -2 a) (* 2 a))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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) (+ (* -1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow a 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 b (fma.f64 b (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 #s(literal 1/4050 binary64) (*.f64 a a)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (fma.f64 angle (*.f64 angle #s(literal 0 binary64)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64)))
(* (pow angle 2) (* (pow b 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 angle angle) #s(literal 0 binary64))
(* (pow b 4) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) b) (*.f64 (*.f64 angle angle) #s(literal 0 binary64)))
(* (pow b 4) (+ (* -4 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 (*.f64 angle angle) (+.f64 #s(literal 0 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 #s(literal 1/4050 binary64) (*.f64 a a)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 b b))) (fma.f64 angle (*.f64 angle (/.f64 #s(literal 0 binary64) b)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 4) (+ (* -4 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow b 3) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 angle (*.f64 angle (/.f64 #s(literal 0 binary64) b)) (fma.f64 angle (*.f64 angle (/.f64 #s(literal 0 binary64) (*.f64 b (*.f64 b b)))) (*.f64 (*.f64 angle angle) (+.f64 #s(literal 0 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 #s(literal 1/4050 binary64) (*.f64 a a)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 b b))))))))
(* (pow angle 2) (* (pow b 4) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 angle angle) #s(literal 0 binary64))
(* (pow b 4) (+ (* -1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) b) (*.f64 (*.f64 angle angle) #s(literal 0 binary64)))
(* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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))))))) b)) (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2))))) b)) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(fma.f64 (pow.f64 b #s(literal 4 binary64)) (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) (/.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 #s(literal 1/4050 binary64) (*.f64 a a)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) b)) b)) (*.f64 (*.f64 angle angle) #s(literal 0 binary64)))
(* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 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)))))))) b)) (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2))))) b)) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) (/.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 #s(literal 1/4050 binary64) (*.f64 a a)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (fma.f64 (*.f64 angle angle) (/.f64 #s(literal 0 binary64) b) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) b)) (neg.f64 b)) (*.f64 (*.f64 angle angle) #s(literal 0 binary64)))
(* (pow angle 2) (+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (*.f64 angle angle) #s(literal 0 binary64))
(+ (* 1/8100 (/ (* a (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 angle (*.f64 angle #s(literal 0 binary64)) (*.f64 (*.f64 angle angle) #s(literal 0 binary64)))
(+ (* a (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* a (+ (* -4 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 a (fma.f64 a (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) #s(literal -2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) #s(literal 1/4050 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64)))
(+ (* a (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* a (+ (* -4 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* a (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow angle 2) (+ (* -1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 angle (*.f64 angle #s(literal 0 binary64)) (fma.f64 a (fma.f64 a (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) #s(literal -2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) #s(literal 1/4050 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64))))
(* (pow a 4) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 angle angle) #s(literal 0 binary64))
(* (pow a 4) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) a) (*.f64 (*.f64 angle angle) #s(literal 0 binary64)))
(* (pow a 4) (+ (* -4 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (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 -4 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 angle (*.f64 angle (/.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 angle angle) (+.f64 #s(literal 0 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) #s(literal -2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) #s(literal 1/4050 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 a a)))))))
(* (pow a 4) (+ (* -4 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow a 3) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (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 -4 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 angle (*.f64 angle (/.f64 #s(literal 0 binary64) a)) (fma.f64 (*.f64 angle angle) (+.f64 #s(literal 0 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) #s(literal -2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) #s(literal 1/4050 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 a a))) (/.f64 (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) (*.f64 a (*.f64 a a)))))))
(* (pow a 4) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 angle angle) #s(literal 0 binary64))
(* (pow a 4) (+ (* -1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) a) (*.f64 (*.f64 angle angle) #s(literal 0 binary64)))
(* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) a)) (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2))))) a)) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) (/.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) #s(literal -2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) #s(literal 1/4050 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) a)) (neg.f64 a)) (*.f64 (*.f64 angle angle) #s(literal 0 binary64)))
(* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow b 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) a)) (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2))))) a)) (* (pow angle 2) (+ (* -1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) #s(literal -2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) #s(literal 1/4050 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) a))) a)) (neg.f64 a)) (*.f64 (*.f64 angle angle) #s(literal 0 binary64)))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 a #s(literal 1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 a #s(literal -1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 a #s(literal 1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 a #s(literal -1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 a #s(literal 1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 a #s(literal -1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 a #s(literal 1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 a #s(literal -1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 a #s(literal 1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 a #s(literal -1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 a #s(literal 1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 a #s(literal -1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 a #s(literal 1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 a #s(literal -1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 a #s(literal 1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 a #s(literal -1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 a #s(literal 1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 a #s(literal -1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 a #s(literal 1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 a #s(literal -1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 a #s(literal 1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 a #s(literal -1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 a #s(literal 1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 a #s(literal -1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (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 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 a #s(literal 1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 a #s(literal -1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (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 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 a #s(literal 1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 a #s(literal -1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (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 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 a #s(literal 1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 a #s(literal -1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (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 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 a #s(literal 1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 a #s(literal -1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (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 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 a #s(literal 1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 a #s(literal -1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (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 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 a #s(literal 1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 a #s(literal -1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (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 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 a #s(literal 1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 a #s(literal -1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (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 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 a #s(literal 1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 a #s(literal -1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (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 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 a #s(literal 1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 a #s(literal -1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (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 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 a #s(literal 1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 a #s(literal -1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (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 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 a #s(literal 1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 a #s(literal -1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (pow b 2)) (* 1/32400 (pow a 2))))) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (PI) 2) (+ (* -1/32400 (pow a 2)) (* 1/32400 (pow b 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (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 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 a #s(literal 1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 a #s(literal -1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale))
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.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 (*.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 b 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 b b) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 b 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 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 a #s(literal 1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64)))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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)))))) (* (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 angle angle) #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 a (*.f64 a #s(literal -1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 (*.f64 b 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 a (*.f64 a #s(literal 1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 b 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 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 b b))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.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 (*.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 b 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 b b) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 b 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 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 a #s(literal 1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64)))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) b)
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) b)
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) b)
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) b)
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) b)
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) b)
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) b)
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) b)
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) b)
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) b)
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) b)
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) b)
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) b)
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) b)
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) b)
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) b)
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) b)
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) b)
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) b)
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) b)
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) b)
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) b)
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) b)
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) b)
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 a a) (*.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 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.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 (*.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 b 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 b b) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 b 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 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 a #s(literal 1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64)))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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)))))) (* (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 angle angle) #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 a (*.f64 a #s(literal -1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 (*.f64 b 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 a (*.f64 a #s(literal 1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 b 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 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 b b))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.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 (*.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 b 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 b b) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 b 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 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 a #s(literal 1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64)))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a a) (*.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 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.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 a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.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 (*.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 b 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 b b) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 b 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 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 a #s(literal 1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64)))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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)))))) (* (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 angle angle) #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (fma.f64 a (*.f64 a #s(literal -1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 (*.f64 b 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 (PI.f64) (PI.f64)) (*.f64 (fma.f64 a (*.f64 a #s(literal 1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 b 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 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 b b))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.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 (*.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 b 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 b b) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 b 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 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 a #s(literal 1/32400 binary64)) (*.f64 (*.f64 b b) #s(literal -1/32400 binary64)))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 a (*.f64 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 b (*.f64 b (*.f64 (PI.f64) (PI.f64)))) (fma.f64 a (*.f64 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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a))) 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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a b) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/ a (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 x-scale y-scale))
(* -4 (/ a (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 x-scale y-scale))
(* -4 (/ a (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 x-scale y-scale))
(* -4 (/ a (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 x-scale y-scale))
(* -4 (/ a (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 x-scale y-scale))
(* -4 (/ a (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 x-scale y-scale))
(* -4 (/ a (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 x-scale y-scale))
(* -4 (/ a (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 x-scale y-scale))
(* -4 (/ a (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 x-scale y-scale))
(* -4 (/ a (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 x-scale y-scale))
(* -4 (/ a (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 x-scale y-scale))
(* -4 (/ a (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 x-scale y-scale))
(* -4 (/ a (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 x-scale y-scale))
(* -4 (/ a (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 x-scale y-scale))
(* -4 (/ a (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 x-scale y-scale))
(* -4 (/ a (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 x-scale y-scale))
(* -4 (/ a (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 x-scale y-scale))
(* -4 (/ a (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 x-scale y-scale))
(* -4 (/ a (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 x-scale y-scale))
(* -4 (/ a (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 x-scale y-scale))
(* -4 (/ a (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 x-scale y-scale))
(* -4 (/ a (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 x-scale y-scale))
(* -4 (/ a (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 x-scale y-scale))
(* -4 (/ a (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 x-scale y-scale))
(* -4 (/ a (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 x-scale y-scale))
(* -4 (/ a (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 x-scale y-scale))
(* -4 (/ a (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 x-scale y-scale))
(* -4 (/ a (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 x-scale y-scale))
(* -4 (/ a (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 x-scale y-scale))
(* -4 (/ a (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 x-scale y-scale))
(* -4 (/ a (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 x-scale y-scale))
(* -4 (/ a (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 x-scale y-scale))
(* -4 (/ a (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 x-scale y-scale))
(* -4 (/ a (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 x-scale y-scale))
(* -4 (/ a (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 x-scale y-scale))
(* -4 (/ a (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) 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))
(* 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 b 2) y-scale)
(/.f64 (*.f64 b b) y-scale)
(/ (pow b 2) y-scale)
(/.f64 (*.f64 b b) y-scale)
(/ (pow b 2) y-scale)
(/.f64 (*.f64 b b) y-scale)
(/ (pow b 2) y-scale)
(/.f64 (*.f64 b b) y-scale)
(/ (pow b 2) y-scale)
(/.f64 (*.f64 b b) y-scale)
(/ (pow b 2) y-scale)
(/.f64 (*.f64 b b) y-scale)
(/ (pow b 2) y-scale)
(/.f64 (*.f64 b b) y-scale)
(/ (pow b 2) y-scale)
(/.f64 (*.f64 b b) y-scale)
(/ (pow b 2) y-scale)
(/.f64 (*.f64 b b) y-scale)
(/ (pow b 2) y-scale)
(/.f64 (*.f64 b b) y-scale)
(/ (pow b 2) y-scale)
(/.f64 (*.f64 b b) y-scale)
(/ (pow b 2) y-scale)
(/.f64 (*.f64 b b) y-scale)
(/ (pow b 2) y-scale)
(/.f64 (*.f64 b b) y-scale)
(/ (pow b 2) y-scale)
(/.f64 (*.f64 b b) y-scale)
(/ (pow b 2) y-scale)
(/.f64 (*.f64 b b) y-scale)
(/ (pow b 2) y-scale)
(/.f64 (*.f64 b b) y-scale)
(/ (pow b 2) y-scale)
(/.f64 (*.f64 b b) y-scale)
(/ (pow b 2) y-scale)
(/.f64 (*.f64 b b) y-scale)
(/ (pow b 2) y-scale)
(/.f64 (*.f64 b b) y-scale)
(/ (pow b 2) y-scale)
(/.f64 (*.f64 b b) y-scale)
(/ (pow b 2) y-scale)
(/.f64 (*.f64 b b) y-scale)
(/ (pow b 2) y-scale)
(/.f64 (*.f64 b b) y-scale)
(/ (pow b 2) y-scale)
(/.f64 (*.f64 b b) y-scale)
(/ (pow b 2) y-scale)
(/.f64 (*.f64 b b) y-scale)

rewrite289.0ms (0.2%)

Memory
-6.8MiB live, 509.4MiB allocated
Rules
6 172×lower-*.f32
6 140×lower-*.f64
3 754×lower-fma.f64
3 754×lower-fma.f32
3 504×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01111014
0138872
1666834
26463799
08230784
Stop Event
iter limit
node limit
iter limit
Counts
22 → 1 093
Calls
Call 1
Inputs
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale))
(/.f64 (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a x-scale) y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))))
#s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64)))
#s(approx (* (* angle angle) 0) #s(literal 0 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 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 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))))
(*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b)
(*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64)))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a 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 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(*.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale))
(*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) 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 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a x-scale)))
(/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale))
(*.f64 x-scale (*.f64 y-scale y-scale))
(*.f64 (*.f64 x-scale y-scale) y-scale)
(/.f64 (*.f64 b b) y-scale)
Outputs
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (*.f64 y-scale (/.f64 x-scale a)))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (*.f64 (/.f64 x-scale a) y-scale))
(/.f64 (/.f64 a x-scale) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))
(/.f64 (/.f64 a x-scale) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) y-scale))
(/.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 x-scale a))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 y-scale (/.f64 x-scale a))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 x-scale a) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 y-scale (/.f64 x-scale a)) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 x-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale y-scale) x-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale (neg.f64 y-scale)) (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale y-scale) x-scale)) y-scale)
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) a) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) a) (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) x-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 a)) (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (neg.f64 x-scale)))
(/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 x-scale (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (*.f64 (neg.f64 a) #s(literal 1 binary64)) (*.f64 (neg.f64 x-scale) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #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 b b))) #s(literal 1 binary64)) (*.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (/.f64 x-scale a)))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (neg.f64 x-scale))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 a (neg.f64 x-scale))) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b)) (/.f64 a x-scale)) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b)) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale (neg.f64 y-scale)) (*.f64 y-scale (/.f64 x-scale a))))
(/.f64 (*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b)) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 x-scale a)))
(/.f64 (*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b)) (/.f64 a (neg.f64 x-scale))) (*.f64 (*.f64 x-scale (neg.f64 y-scale)) (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale)) a) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale)) (/.f64 a x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale)) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 y-scale (/.f64 x-scale a))))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale)) (/.f64 a (neg.f64 x-scale))) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 a (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale (neg.f64 y-scale))))
(/.f64 (*.f64 a (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale))) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 (/.f64 x-scale a) (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 (*.f64 y-scale (/.f64 x-scale a)) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))) (*.f64 (/.f64 x-scale a) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))) (*.f64 (*.f64 y-scale (/.f64 x-scale a)) (*.f64 x-scale (neg.f64 y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale))) (*.f64 (/.f64 x-scale a) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (neg.f64 a) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (neg.f64 a) (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))) (*.f64 (neg.f64 x-scale) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (neg.f64 a) (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale))) (*.f64 (neg.f64 x-scale) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) #s(literal 1 binary64)) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale))) (*.f64 y-scale y-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale))) (*.f64 (*.f64 y-scale (/.f64 x-scale a)) y-scale))
(/.f64 (*.f64 (/.f64 a (neg.f64 x-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 a (neg.f64 x-scale)) #s(literal 1 binary64)) (*.f64 (neg.f64 y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (*.f64 (/.f64 a (neg.f64 x-scale)) (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))) (*.f64 (neg.f64 y-scale) (*.f64 x-scale (neg.f64 y-scale))))
(/.f64 (*.f64 (/.f64 a (neg.f64 x-scale)) (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale))) (*.f64 (neg.f64 y-scale) y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) a) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 x-scale a)))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (neg.f64 a)) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b)) (neg.f64 a)) (*.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))) (neg.f64 x-scale)))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale)) a) (*.f64 (*.f64 x-scale y-scale) x-scale))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale)) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 x-scale a)))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale)) (neg.f64 a)) (*.f64 (*.f64 x-scale y-scale) (neg.f64 x-scale)))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 a (*.f64 a b))))) (neg.f64 (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(/.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 x-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale y-scale) x-scale))) (neg.f64 y-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-scale))) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (neg.f64 x-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale))) y-scale)
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale y-scale))) #s(literal 1 binary64)) (/.f64 x-scale a))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale y-scale))) (neg.f64 a)) (neg.f64 x-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale) (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) x-scale)) b) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale)) (/.f64 a (*.f64 x-scale y-scale))) y-scale)
(/.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 x-scale))
(/.f64 (*.f64 (/.f64 a (neg.f64 x-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 b b) a) (*.f64 x-scale y-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 a #s(literal -4 binary64))))
(/.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 b b) a) (*.f64 x-scale y-scale))) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) x-scale) (/.f64 (*.f64 (*.f64 b b) a) (*.f64 x-scale y-scale))) y-scale)
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale)) (/.f64 a x-scale)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale)))) x-scale)
(/.f64 (*.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale)))) x-scale)
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a 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 (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-scale)) x-scale) y-scale)
(/.f64 (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-scale)) y-scale) x-scale)
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b))))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 y-scale (/.f64 x-scale a))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 x-scale a) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) #s(literal -1 binary64))
(pow.f64 (*.f64 (*.f64 y-scale (/.f64 x-scale a)) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale))) #s(literal -1 binary64))
(pow.f64 (/.f64 x-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 y-scale (*.f64 x-scale y-scale)))) #s(literal -1 binary64))
(pow.f64 (/.f64 y-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale y-scale) x-scale))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-scale))) #s(literal -1 binary64))
(*.f64 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 a (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) (/.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 a (*.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) a) (*.f64 x-scale y-scale))))
(*.f64 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 a x-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b (*.f64 a (*.f64 a b))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 b (*.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 b (/.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 a x-scale)))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 (/.f64 a x-scale) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (/.f64 a x-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 a x-scale) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))))
(*.f64 (/.f64 a x-scale) (*.f64 (/.f64 #s(literal -4 binary64) y-scale) (/.f64 (*.f64 (*.f64 b b) a) (*.f64 x-scale y-scale))))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-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 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 a a) (*.f64 (*.f64 #s(literal -4 binary64) b) (/.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 a a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) b) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 #s(literal -4 binary64) b) (*.f64 (*.f64 a a) (/.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (/.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) a) (*.f64 x-scale y-scale))))
(*.f64 (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) a) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))) (/.f64 a x-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 a x-scale))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale))
(*.f64 (*.f64 a (/.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) x-scale)) (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a (/.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) x-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))))
(*.f64 (*.f64 a (*.f64 a b)) (*.f64 #s(literal -4 binary64) (/.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (/.f64 (*.f64 (*.f64 b b) a) (*.f64 x-scale y-scale)) (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale y-scale) x-scale)) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale)) (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale)) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale)) (/.f64 a (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale)) (/.f64 (/.f64 a x-scale) (*.f64 y-scale y-scale)))
(*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale)) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) y-scale))
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) x-scale))
(*.f64 (/.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)))
(*.f64 (/.f64 #s(literal -4 binary64) x-scale) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 b x-scale) (/.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 b (*.f64 x-scale x-scale)) (/.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (*.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 #s(literal -4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale))
(*.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 b 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))) (*.f64 x-scale x-scale)) (/.f64 a (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (*.f64 x-scale x-scale)) (/.f64 b (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (/.f64 a x-scale) x-scale))
(*.f64 (*.f64 (/.f64 a x-scale) a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (/.f64 a x-scale) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale))
(*.f64 (*.f64 (/.f64 a x-scale) (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)))) (/.f64 (*.f64 b b) y-scale))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 a x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale))
(exp.f64 (*.f64 (log.f64 (*.f64 y-scale (/.f64 x-scale a))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (/.f64 a x-scale) (neg.f64 y-scale)))
(neg.f64 (/.f64 (/.f64 a (neg.f64 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 (/.f64 a (neg.f64 x-scale)) (neg.f64 y-scale))
(/.f64 (neg.f64 a) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 x-scale a))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 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)) (*.f64 x-scale (neg.f64 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 a (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 #s(literal 1 binary64) 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 (/.f64 a (neg.f64 x-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 a 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 b b))) (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (neg.f64 y-scale))))
(neg.f64 (/.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b)) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale))))
(/.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b)) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale)) x-scale)
(/.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale)) y-scale)
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (/.f64 x-scale a) y-scale))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #s(literal 1 binary64)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 #s(literal -4 binary64) (*.f64 b b))) y-scale)
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 b b)) (/.f64 (*.f64 x-scale y-scale) (*.f64 a #s(literal -4 binary64))))
(/.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) x-scale) (*.f64 b b)) y-scale)
(/.f64 (neg.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))) (neg.f64 (*.f64 x-scale (neg.f64 y-scale))))
(/.f64 (neg.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale)) (/.f64 x-scale a))
(/.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale)) (neg.f64 x-scale))
(pow.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 y-scale (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale))) #s(literal -1 binary64))
(*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)))
(*.f64 a (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale)))
(*.f64 a (*.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)) (*.f64 b b)))
(*.f64 (*.f64 b b) (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 a x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale))
(*.f64 (/.f64 a x-scale) (*.f64 (/.f64 #s(literal -4 binary64) y-scale) (*.f64 b b)))
(*.f64 (*.f64 a #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 (*.f64 b b) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))))
(*.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (*.f64 b b)))
(*.f64 (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))) (*.f64 b b))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (neg.f64 y-scale))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale) (/.f64 a y-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale) (/.f64 a x-scale))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))
(*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) x-scale) (/.f64 (*.f64 b b) y-scale))
(*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale)) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) a)
(*.f64 (/.f64 a y-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale))
(*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) y-scale) (/.f64 (*.f64 b b) x-scale))
(*.f64 (*.f64 (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))) 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))))
#s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64)))
#s(approx (* (* angle angle) 0) #s(literal 0 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 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (*.f64 y-scale (/.f64 x-scale a)))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (*.f64 (/.f64 x-scale a) y-scale))
(/.f64 (/.f64 a x-scale) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))
(/.f64 (/.f64 a x-scale) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) y-scale))
(/.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 x-scale a))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 y-scale (/.f64 x-scale a))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 x-scale a) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 y-scale (/.f64 x-scale a)) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 x-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale y-scale) x-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale (neg.f64 y-scale)) (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale y-scale) x-scale)) y-scale)
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) a) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) a) (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) x-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 a)) (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (neg.f64 x-scale)))
(/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 x-scale (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (*.f64 (neg.f64 a) #s(literal 1 binary64)) (*.f64 (neg.f64 x-scale) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #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 b b))) #s(literal 1 binary64)) (*.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (/.f64 x-scale a)))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (neg.f64 x-scale))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 a (neg.f64 x-scale))) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b)) (/.f64 a x-scale)) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b)) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale (neg.f64 y-scale)) (*.f64 y-scale (/.f64 x-scale a))))
(/.f64 (*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b)) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 x-scale a)))
(/.f64 (*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b)) (/.f64 a (neg.f64 x-scale))) (*.f64 (*.f64 x-scale (neg.f64 y-scale)) (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale)) a) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale)) (/.f64 a x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale)) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 y-scale (/.f64 x-scale a))))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale)) (/.f64 a (neg.f64 x-scale))) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 a (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale (neg.f64 y-scale))))
(/.f64 (*.f64 a (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale))) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 (/.f64 x-scale a) (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 (*.f64 y-scale (/.f64 x-scale a)) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))) (*.f64 (/.f64 x-scale a) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))) (*.f64 (*.f64 y-scale (/.f64 x-scale a)) (*.f64 x-scale (neg.f64 y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale))) (*.f64 (/.f64 x-scale a) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (neg.f64 a) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (neg.f64 a) (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))) (*.f64 (neg.f64 x-scale) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (neg.f64 a) (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale))) (*.f64 (neg.f64 x-scale) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) #s(literal 1 binary64)) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale))) (*.f64 y-scale y-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale))) (*.f64 (*.f64 y-scale (/.f64 x-scale a)) y-scale))
(/.f64 (*.f64 (/.f64 a (neg.f64 x-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 a (neg.f64 x-scale)) #s(literal 1 binary64)) (*.f64 (neg.f64 y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (*.f64 (/.f64 a (neg.f64 x-scale)) (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))) (*.f64 (neg.f64 y-scale) (*.f64 x-scale (neg.f64 y-scale))))
(/.f64 (*.f64 (/.f64 a (neg.f64 x-scale)) (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale))) (*.f64 (neg.f64 y-scale) y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) a) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 x-scale a)))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (neg.f64 a)) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b)) (neg.f64 a)) (*.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))) (neg.f64 x-scale)))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale)) a) (*.f64 (*.f64 x-scale y-scale) x-scale))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale)) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 x-scale a)))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale)) (neg.f64 a)) (*.f64 (*.f64 x-scale y-scale) (neg.f64 x-scale)))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 a (*.f64 a b))))) (neg.f64 (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(/.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 x-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale y-scale) x-scale))) (neg.f64 y-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-scale))) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (neg.f64 x-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale))) y-scale)
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale y-scale))) #s(literal 1 binary64)) (/.f64 x-scale a))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale y-scale))) (neg.f64 a)) (neg.f64 x-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale) (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) x-scale)) b) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale)) (/.f64 a (*.f64 x-scale y-scale))) y-scale)
(/.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 x-scale))
(/.f64 (*.f64 (/.f64 a (neg.f64 x-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 b b) a) (*.f64 x-scale y-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 a #s(literal -4 binary64))))
(/.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 b b) a) (*.f64 x-scale y-scale))) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) x-scale) (/.f64 (*.f64 (*.f64 b b) a) (*.f64 x-scale y-scale))) y-scale)
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale)) (/.f64 a x-scale)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale)))) x-scale)
(/.f64 (*.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale)))) x-scale)
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a 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 (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-scale)) x-scale) y-scale)
(/.f64 (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-scale)) y-scale) x-scale)
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b))))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 y-scale (/.f64 x-scale a))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 x-scale a) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) #s(literal -1 binary64))
(pow.f64 (*.f64 (*.f64 y-scale (/.f64 x-scale a)) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale))) #s(literal -1 binary64))
(pow.f64 (/.f64 x-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 y-scale (*.f64 x-scale y-scale)))) #s(literal -1 binary64))
(pow.f64 (/.f64 y-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale y-scale) x-scale))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-scale))) #s(literal -1 binary64))
(*.f64 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 a (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) (/.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 a (*.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) a) (*.f64 x-scale y-scale))))
(*.f64 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 a x-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b (*.f64 a (*.f64 a b))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 b (*.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 b (/.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 a x-scale)))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 (/.f64 a x-scale) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (/.f64 a x-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 a x-scale) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))))
(*.f64 (/.f64 a x-scale) (*.f64 (/.f64 #s(literal -4 binary64) y-scale) (/.f64 (*.f64 (*.f64 b b) a) (*.f64 x-scale y-scale))))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-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 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 a a) (*.f64 (*.f64 #s(literal -4 binary64) b) (/.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 a a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) b) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 #s(literal -4 binary64) b) (*.f64 (*.f64 a a) (/.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (/.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) a) (*.f64 x-scale y-scale))))
(*.f64 (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) a) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))) (/.f64 a x-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 a x-scale))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale))
(*.f64 (*.f64 a (/.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) x-scale)) (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a (/.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) x-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))))
(*.f64 (*.f64 a (*.f64 a b)) (*.f64 #s(literal -4 binary64) (/.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (/.f64 (*.f64 (*.f64 b b) a) (*.f64 x-scale y-scale)) (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale y-scale) x-scale)) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale)) (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale)) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale)) (/.f64 a (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale)) (/.f64 (/.f64 a x-scale) (*.f64 y-scale y-scale)))
(*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale)) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) y-scale))
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) x-scale))
(*.f64 (/.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)))
(*.f64 (/.f64 #s(literal -4 binary64) x-scale) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 b x-scale) (/.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 b (*.f64 x-scale x-scale)) (/.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (*.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 #s(literal -4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale))
(*.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 b 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))) (*.f64 x-scale x-scale)) (/.f64 a (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (*.f64 x-scale x-scale)) (/.f64 b (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (/.f64 a x-scale) x-scale))
(*.f64 (*.f64 (/.f64 a x-scale) a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (/.f64 a x-scale) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale))
(*.f64 (*.f64 (/.f64 a x-scale) (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)))) (/.f64 (*.f64 b b) y-scale))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 a x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale))
(*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))
(*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b))))
(*.f64 b (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(*.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 #s(literal -4 binary64) b) (*.f64 a (*.f64 a b)))
(*.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) b)
(*.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 (*.f64 b b) a))
(*.f64 (*.f64 a b) (*.f64 (*.f64 a #s(literal -4 binary64)) b))
(*.f64 (*.f64 b (*.f64 a (*.f64 a b))) #s(literal -4 binary64))
(*.f64 (*.f64 a (*.f64 a b)) (*.f64 #s(literal -4 binary64) b))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a b)))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) b))
(*.f64 (*.f64 #s(literal -4 binary64) b) (*.f64 a a))
(*.f64 (*.f64 a (*.f64 a b)) #s(literal -4 binary64))
(*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) a)
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) b)
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (*.f64 y-scale (/.f64 x-scale a)))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (*.f64 (/.f64 x-scale a) y-scale))
(/.f64 (/.f64 a x-scale) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))
(/.f64 (/.f64 a x-scale) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) y-scale))
(/.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 x-scale a))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 y-scale (/.f64 x-scale a))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 x-scale a) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 y-scale (/.f64 x-scale a)) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 x-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale y-scale) x-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale (neg.f64 y-scale)) (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale y-scale) x-scale)) y-scale)
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) a) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) a) (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) x-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 a)) (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (neg.f64 x-scale)))
(/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 x-scale (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (*.f64 (neg.f64 a) #s(literal 1 binary64)) (*.f64 (neg.f64 x-scale) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #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 b b))) #s(literal 1 binary64)) (*.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (/.f64 x-scale a)))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (neg.f64 x-scale))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 a (neg.f64 x-scale))) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b)) (/.f64 a x-scale)) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b)) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale (neg.f64 y-scale)) (*.f64 y-scale (/.f64 x-scale a))))
(/.f64 (*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b)) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 x-scale a)))
(/.f64 (*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b)) (/.f64 a (neg.f64 x-scale))) (*.f64 (*.f64 x-scale (neg.f64 y-scale)) (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale)) a) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale)) (/.f64 a x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale)) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 y-scale (/.f64 x-scale a))))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale)) (/.f64 a (neg.f64 x-scale))) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 a (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale (neg.f64 y-scale))))
(/.f64 (*.f64 a (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale))) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 (/.f64 x-scale a) (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 (*.f64 y-scale (/.f64 x-scale a)) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))) (*.f64 (/.f64 x-scale a) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))) (*.f64 (*.f64 y-scale (/.f64 x-scale a)) (*.f64 x-scale (neg.f64 y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale))) (*.f64 (/.f64 x-scale a) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (neg.f64 a) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (neg.f64 a) (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))) (*.f64 (neg.f64 x-scale) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (neg.f64 a) (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale))) (*.f64 (neg.f64 x-scale) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) #s(literal 1 binary64)) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale))) (*.f64 y-scale y-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale))) (*.f64 (*.f64 y-scale (/.f64 x-scale a)) y-scale))
(/.f64 (*.f64 (/.f64 a (neg.f64 x-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 a (neg.f64 x-scale)) #s(literal 1 binary64)) (*.f64 (neg.f64 y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (*.f64 (/.f64 a (neg.f64 x-scale)) (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))) (*.f64 (neg.f64 y-scale) (*.f64 x-scale (neg.f64 y-scale))))
(/.f64 (*.f64 (/.f64 a (neg.f64 x-scale)) (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale))) (*.f64 (neg.f64 y-scale) y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) a) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 x-scale a)))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (neg.f64 a)) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b)) (neg.f64 a)) (*.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))) (neg.f64 x-scale)))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale)) a) (*.f64 (*.f64 x-scale y-scale) x-scale))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale)) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 x-scale a)))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale)) (neg.f64 a)) (*.f64 (*.f64 x-scale y-scale) (neg.f64 x-scale)))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 a (*.f64 a b))))) (neg.f64 (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(/.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 x-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale y-scale) x-scale))) (neg.f64 y-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-scale))) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (neg.f64 x-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale))) y-scale)
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale y-scale))) #s(literal 1 binary64)) (/.f64 x-scale a))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale y-scale))) (neg.f64 a)) (neg.f64 x-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale) (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) x-scale)) b) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale)) (/.f64 a (*.f64 x-scale y-scale))) y-scale)
(/.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 x-scale))
(/.f64 (*.f64 (/.f64 a (neg.f64 x-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 b b) a) (*.f64 x-scale y-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 a #s(literal -4 binary64))))
(/.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 b b) a) (*.f64 x-scale y-scale))) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) x-scale) (/.f64 (*.f64 (*.f64 b b) a) (*.f64 x-scale y-scale))) y-scale)
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale)) (/.f64 a x-scale)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale)))) x-scale)
(/.f64 (*.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale)))) x-scale)
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a 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 (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-scale)) x-scale) y-scale)
(/.f64 (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-scale)) y-scale) x-scale)
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b))))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 y-scale (/.f64 x-scale a))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 x-scale a) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) #s(literal -1 binary64))
(pow.f64 (*.f64 (*.f64 y-scale (/.f64 x-scale a)) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale))) #s(literal -1 binary64))
(pow.f64 (/.f64 x-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 y-scale (*.f64 x-scale y-scale)))) #s(literal -1 binary64))
(pow.f64 (/.f64 y-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale y-scale) x-scale))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-scale))) #s(literal -1 binary64))
(*.f64 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 a (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) (/.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 a (*.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) a) (*.f64 x-scale y-scale))))
(*.f64 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 a x-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b (*.f64 a (*.f64 a b))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 b (*.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 b (/.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 a x-scale)))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 (/.f64 a x-scale) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (/.f64 a x-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 a x-scale) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))))
(*.f64 (/.f64 a x-scale) (*.f64 (/.f64 #s(literal -4 binary64) y-scale) (/.f64 (*.f64 (*.f64 b b) a) (*.f64 x-scale y-scale))))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-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 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 a a) (*.f64 (*.f64 #s(literal -4 binary64) b) (/.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 a a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) b) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 #s(literal -4 binary64) b) (*.f64 (*.f64 a a) (/.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (/.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) a) (*.f64 x-scale y-scale))))
(*.f64 (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) a) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))) (/.f64 a x-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 a x-scale))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale))
(*.f64 (*.f64 a (/.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) x-scale)) (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a (/.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) x-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))))
(*.f64 (*.f64 a (*.f64 a b)) (*.f64 #s(literal -4 binary64) (/.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (/.f64 (*.f64 (*.f64 b b) a) (*.f64 x-scale y-scale)) (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale y-scale) x-scale)) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale)) (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale)) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale)) (/.f64 a (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale)) (/.f64 (/.f64 a x-scale) (*.f64 y-scale y-scale)))
(*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale)) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) y-scale))
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) x-scale))
(*.f64 (/.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)))
(*.f64 (/.f64 #s(literal -4 binary64) x-scale) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 b x-scale) (/.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 b (*.f64 x-scale x-scale)) (/.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (*.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 #s(literal -4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale))
(*.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 b 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))) (*.f64 x-scale x-scale)) (/.f64 a (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (*.f64 x-scale x-scale)) (/.f64 b (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (/.f64 a x-scale) x-scale))
(*.f64 (*.f64 (/.f64 a x-scale) a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (/.f64 a x-scale) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale))
(*.f64 (*.f64 (/.f64 a x-scale) (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)))) (/.f64 (*.f64 b b) y-scale))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 a x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) 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 y-scale (*.f64 x-scale y-scale))))))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale)))))
(neg.f64 (/.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) y-scale)
(/.f64 (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))) (/.f64 y-scale (*.f64 b b)))
(/.f64 (/.f64 (*.f64 b b) y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a #s(literal -4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (*.f64 x-scale y-scale) (*.f64 a #s(literal -4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale))))
(/.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b)) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale)) (*.f64 y-scale y-scale))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 y-scale (/.f64 x-scale a)) y-scale))
(/.f64 (*.f64 (*.f64 b b) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 (*.f64 x-scale y-scale) (*.f64 a #s(literal -4 binary64)))))
(/.f64 (*.f64 (*.f64 b (neg.f64 b)) #s(literal 1 binary64)) (*.f64 (neg.f64 y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a #s(literal -4 binary64)))))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (/.f64 a (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (neg.f64 y-scale) y-scale))
(/.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 y-scale (*.f64 b b))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 b b)) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a #s(literal -4 binary64))) y-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 b (neg.f64 b))) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a #s(literal -4 binary64))) (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale (neg.f64 y-scale)) (/.f64 y-scale (*.f64 b b))))
(/.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b (neg.f64 b))) (*.f64 (*.f64 x-scale (neg.f64 y-scale)) (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) x-scale) (*.f64 b b)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) x-scale) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 y-scale (*.f64 b b))))
(/.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) x-scale) (*.f64 b (neg.f64 b))) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 b b) (*.f64 a #s(literal 4 binary64))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (*.f64 b b) (/.f64 (*.f64 a #s(literal -4 binary64)) x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 a #s(literal -4 binary64))) (*.f64 (/.f64 y-scale (*.f64 b b)) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 a #s(literal 4 binary64))) (*.f64 (/.f64 y-scale (*.f64 b b)) (*.f64 x-scale (neg.f64 y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a #s(literal -4 binary64)) x-scale)) (*.f64 (/.f64 y-scale (*.f64 b b)) y-scale))
(/.f64 (*.f64 (*.f64 b (neg.f64 b)) (*.f64 a #s(literal -4 binary64))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (*.f64 b (neg.f64 b)) (*.f64 a #s(literal 4 binary64))) (*.f64 (neg.f64 y-scale) (*.f64 x-scale (neg.f64 y-scale))))
(/.f64 (*.f64 (*.f64 b (neg.f64 b)) (/.f64 (*.f64 a #s(literal -4 binary64)) x-scale)) (*.f64 (neg.f64 y-scale) y-scale))
(/.f64 (neg.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))) (neg.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))) (neg.f64 y-scale))
(/.f64 (neg.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale))) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale y-scale)) x-scale)
(/.f64 (*.f64 (/.f64 (*.f64 b b) y-scale) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 a #s(literal -4 binary64))))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 #s(literal -4 binary64) (*.f64 b b))) y-scale)
(/.f64 (*.f64 (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))) #s(literal 1 binary64)) (/.f64 y-scale (*.f64 b b)))
(/.f64 (*.f64 (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))) (*.f64 b (neg.f64 b))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 b b) y-scale) (*.f64 a #s(literal 4 binary64))) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 b b) y-scale) (/.f64 (*.f64 a #s(literal -4 binary64)) x-scale)) y-scale)
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale)) (*.f64 y-scale (/.f64 x-scale a)))
(/.f64 (*.f64 (/.f64 a (neg.f64 x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale)) (neg.f64 y-scale))
(/.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 b b) y-scale)) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 b (neg.f64 b)) (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (/.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale)) y-scale) x-scale)
(pow.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (*.f64 x-scale y-scale) (*.f64 a #s(literal -4 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale))) #s(literal -1 binary64))
(*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 b (*.f64 (/.f64 b y-scale) (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 b b) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 a x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 b b)) y-scale)))
(*.f64 (/.f64 a x-scale) (*.f64 (/.f64 #s(literal -4 binary64) y-scale) (/.f64 (*.f64 b b) y-scale)))
(*.f64 (/.f64 a x-scale) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale) y-scale))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale))
(*.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 (*.f64 b b) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)))
(*.f64 (*.f64 a #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 a #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b b) y-scale) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))) (/.f64 (*.f64 b b) y-scale))
(*.f64 (/.f64 (*.f64 b b) y-scale) (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale) (/.f64 a (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))
(*.f64 (/.f64 (*.f64 (*.f64 b b) a) (*.f64 x-scale y-scale)) (/.f64 #s(literal -4 binary64) y-scale))
(*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) x-scale) (/.f64 (*.f64 b b) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) x-scale) (/.f64 (/.f64 (*.f64 b b) y-scale) y-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (/.f64 a y-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 y-scale (*.f64 x-scale y-scale))) a)
(*.f64 (/.f64 a (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale))
(*.f64 (/.f64 a y-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) y-scale) (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) y-scale) (/.f64 (/.f64 (*.f64 b b) y-scale) x-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 a x-scale))
(*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) x-scale))
(*.f64 (*.f64 (/.f64 (*.f64 b b) y-scale) a) (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))) b) (/.f64 b y-scale))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))
(*.f64 (*.f64 b b) (*.f64 a #s(literal -4 binary64)))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) a)
(*.f64 (*.f64 #s(literal -4 binary64) b) (*.f64 a b))
(*.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 b b))
(*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)
(*.f64 (*.f64 a (*.f64 b b)) #s(literal -4 binary64))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (*.f64 y-scale (/.f64 x-scale a)))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (*.f64 (/.f64 x-scale a) y-scale))
(/.f64 (/.f64 a x-scale) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))
(/.f64 (/.f64 a x-scale) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) y-scale))
(/.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 x-scale a))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 y-scale (/.f64 x-scale a))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 x-scale a) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 y-scale (/.f64 x-scale a)) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 x-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale y-scale) x-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale (neg.f64 y-scale)) (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale y-scale) x-scale)) y-scale)
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) a) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) a) (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) x-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 a)) (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (neg.f64 x-scale)))
(/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 x-scale (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (*.f64 (neg.f64 a) #s(literal 1 binary64)) (*.f64 (neg.f64 x-scale) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #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 b b))) #s(literal 1 binary64)) (*.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (/.f64 x-scale a)))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (neg.f64 x-scale))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 a (neg.f64 x-scale))) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b)) (/.f64 a x-scale)) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b)) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale (neg.f64 y-scale)) (*.f64 y-scale (/.f64 x-scale a))))
(/.f64 (*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b)) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 x-scale a)))
(/.f64 (*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b)) (/.f64 a (neg.f64 x-scale))) (*.f64 (*.f64 x-scale (neg.f64 y-scale)) (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale)) a) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale)) (/.f64 a x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale)) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 y-scale (/.f64 x-scale a))))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale)) (/.f64 a (neg.f64 x-scale))) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 a (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale (neg.f64 y-scale))))
(/.f64 (*.f64 a (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale))) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 (/.f64 x-scale a) (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 (*.f64 y-scale (/.f64 x-scale a)) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))) (*.f64 (/.f64 x-scale a) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))) (*.f64 (*.f64 y-scale (/.f64 x-scale a)) (*.f64 x-scale (neg.f64 y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale))) (*.f64 (/.f64 x-scale a) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (neg.f64 a) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (neg.f64 a) (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))) (*.f64 (neg.f64 x-scale) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (neg.f64 a) (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale))) (*.f64 (neg.f64 x-scale) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) #s(literal 1 binary64)) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale))) (*.f64 y-scale y-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale))) (*.f64 (*.f64 y-scale (/.f64 x-scale a)) y-scale))
(/.f64 (*.f64 (/.f64 a (neg.f64 x-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 a (neg.f64 x-scale)) #s(literal 1 binary64)) (*.f64 (neg.f64 y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (*.f64 (/.f64 a (neg.f64 x-scale)) (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))) (*.f64 (neg.f64 y-scale) (*.f64 x-scale (neg.f64 y-scale))))
(/.f64 (*.f64 (/.f64 a (neg.f64 x-scale)) (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale))) (*.f64 (neg.f64 y-scale) y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) a) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 x-scale a)))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (neg.f64 a)) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b)) (neg.f64 a)) (*.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))) (neg.f64 x-scale)))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale)) a) (*.f64 (*.f64 x-scale y-scale) x-scale))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale)) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 x-scale a)))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale)) (neg.f64 a)) (*.f64 (*.f64 x-scale y-scale) (neg.f64 x-scale)))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 a (*.f64 a b))))) (neg.f64 (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(/.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 x-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale y-scale) x-scale))) (neg.f64 y-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-scale))) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (neg.f64 x-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale))) y-scale)
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale y-scale))) #s(literal 1 binary64)) (/.f64 x-scale a))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale y-scale))) (neg.f64 a)) (neg.f64 x-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale) (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) x-scale)) b) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale)) (/.f64 a (*.f64 x-scale y-scale))) y-scale)
(/.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 x-scale))
(/.f64 (*.f64 (/.f64 a (neg.f64 x-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 b b) a) (*.f64 x-scale y-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 a #s(literal -4 binary64))))
(/.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 b b) a) (*.f64 x-scale y-scale))) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) x-scale) (/.f64 (*.f64 (*.f64 b b) a) (*.f64 x-scale y-scale))) y-scale)
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale)) (/.f64 a x-scale)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale)))) x-scale)
(/.f64 (*.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale)))) x-scale)
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a 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 (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-scale)) x-scale) y-scale)
(/.f64 (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-scale)) y-scale) x-scale)
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b))))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 y-scale (/.f64 x-scale a))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 x-scale a) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) #s(literal -1 binary64))
(pow.f64 (*.f64 (*.f64 y-scale (/.f64 x-scale a)) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale))) #s(literal -1 binary64))
(pow.f64 (/.f64 x-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 y-scale (*.f64 x-scale y-scale)))) #s(literal -1 binary64))
(pow.f64 (/.f64 y-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale y-scale) x-scale))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-scale))) #s(literal -1 binary64))
(*.f64 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 a (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) (/.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 a (*.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) a) (*.f64 x-scale y-scale))))
(*.f64 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 a x-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b (*.f64 a (*.f64 a b))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 b (*.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 b (/.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 a x-scale)))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 (/.f64 a x-scale) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (/.f64 a x-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 a x-scale) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))))
(*.f64 (/.f64 a x-scale) (*.f64 (/.f64 #s(literal -4 binary64) y-scale) (/.f64 (*.f64 (*.f64 b b) a) (*.f64 x-scale y-scale))))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-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 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 a a) (*.f64 (*.f64 #s(literal -4 binary64) b) (/.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 a a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) b) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 #s(literal -4 binary64) b) (*.f64 (*.f64 a a) (/.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (/.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) a) (*.f64 x-scale y-scale))))
(*.f64 (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) a) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))) (/.f64 a x-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 a x-scale))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale))
(*.f64 (*.f64 a (/.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) x-scale)) (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a (/.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) x-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))))
(*.f64 (*.f64 a (*.f64 a b)) (*.f64 #s(literal -4 binary64) (/.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (/.f64 (*.f64 (*.f64 b b) a) (*.f64 x-scale y-scale)) (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale y-scale) x-scale)) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale)) (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale)) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale)) (/.f64 a (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale)) (/.f64 (/.f64 a x-scale) (*.f64 y-scale y-scale)))
(*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale)) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) y-scale))
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) x-scale))
(*.f64 (/.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)))
(*.f64 (/.f64 #s(literal -4 binary64) x-scale) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 b x-scale) (/.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 b (*.f64 x-scale x-scale)) (/.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (*.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 #s(literal -4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale))
(*.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 b 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))) (*.f64 x-scale x-scale)) (/.f64 a (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (*.f64 x-scale x-scale)) (/.f64 b (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (/.f64 a x-scale) x-scale))
(*.f64 (*.f64 (/.f64 a x-scale) a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (/.f64 a x-scale) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale))
(*.f64 (*.f64 (/.f64 a x-scale) (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)))) (/.f64 (*.f64 b b) y-scale))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 a x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale)))))
(neg.f64 (/.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) y-scale)
(/.f64 (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))) (/.f64 y-scale (*.f64 b b)))
(/.f64 (/.f64 (*.f64 b b) y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a #s(literal -4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (*.f64 x-scale y-scale) (*.f64 a #s(literal -4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale))))
(/.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b)) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale)) (*.f64 y-scale y-scale))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 y-scale (/.f64 x-scale a)) y-scale))
(/.f64 (*.f64 (*.f64 b b) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 (*.f64 x-scale y-scale) (*.f64 a #s(literal -4 binary64)))))
(/.f64 (*.f64 (*.f64 b (neg.f64 b)) #s(literal 1 binary64)) (*.f64 (neg.f64 y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a #s(literal -4 binary64)))))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (/.f64 a (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (neg.f64 y-scale) y-scale))
(/.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 y-scale (*.f64 b b))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 b b)) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a #s(literal -4 binary64))) y-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 b (neg.f64 b))) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a #s(literal -4 binary64))) (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale (neg.f64 y-scale)) (/.f64 y-scale (*.f64 b b))))
(/.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b (neg.f64 b))) (*.f64 (*.f64 x-scale (neg.f64 y-scale)) (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) x-scale) (*.f64 b b)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) x-scale) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 y-scale (*.f64 b b))))
(/.f64 (*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) x-scale) (*.f64 b (neg.f64 b))) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 b b) (*.f64 a #s(literal 4 binary64))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (*.f64 b b) (/.f64 (*.f64 a #s(literal -4 binary64)) x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 a #s(literal -4 binary64))) (*.f64 (/.f64 y-scale (*.f64 b b)) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 a #s(literal 4 binary64))) (*.f64 (/.f64 y-scale (*.f64 b b)) (*.f64 x-scale (neg.f64 y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a #s(literal -4 binary64)) x-scale)) (*.f64 (/.f64 y-scale (*.f64 b b)) y-scale))
(/.f64 (*.f64 (*.f64 b (neg.f64 b)) (*.f64 a #s(literal -4 binary64))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (*.f64 b (neg.f64 b)) (*.f64 a #s(literal 4 binary64))) (*.f64 (neg.f64 y-scale) (*.f64 x-scale (neg.f64 y-scale))))
(/.f64 (*.f64 (*.f64 b (neg.f64 b)) (/.f64 (*.f64 a #s(literal -4 binary64)) x-scale)) (*.f64 (neg.f64 y-scale) y-scale))
(/.f64 (neg.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))) (neg.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))) (neg.f64 y-scale))
(/.f64 (neg.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale))) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale y-scale)) x-scale)
(/.f64 (*.f64 (/.f64 (*.f64 b b) y-scale) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 a #s(literal -4 binary64))))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 #s(literal -4 binary64) (*.f64 b b))) y-scale)
(/.f64 (*.f64 (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))) #s(literal 1 binary64)) (/.f64 y-scale (*.f64 b b)))
(/.f64 (*.f64 (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))) (*.f64 b (neg.f64 b))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 b b) y-scale) (*.f64 a #s(literal 4 binary64))) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 b b) y-scale) (/.f64 (*.f64 a #s(literal -4 binary64)) x-scale)) y-scale)
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale)) (*.f64 y-scale (/.f64 x-scale a)))
(/.f64 (*.f64 (/.f64 a (neg.f64 x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale)) (neg.f64 y-scale))
(/.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 b b) y-scale)) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 b (neg.f64 b)) (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (/.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale)) y-scale) x-scale)
(pow.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (*.f64 x-scale y-scale) (*.f64 a #s(literal -4 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale))) #s(literal -1 binary64))
(*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 b (*.f64 (/.f64 b y-scale) (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 b b) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 a x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 b b)) y-scale)))
(*.f64 (/.f64 a x-scale) (*.f64 (/.f64 #s(literal -4 binary64) y-scale) (/.f64 (*.f64 b b) y-scale)))
(*.f64 (/.f64 a x-scale) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale) y-scale))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale))
(*.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 (*.f64 b b) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)))
(*.f64 (*.f64 a #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 a #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b b) y-scale) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))) (/.f64 (*.f64 b b) y-scale))
(*.f64 (/.f64 (*.f64 b b) y-scale) (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale) (/.f64 a (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))
(*.f64 (/.f64 (*.f64 (*.f64 b b) a) (*.f64 x-scale y-scale)) (/.f64 #s(literal -4 binary64) y-scale))
(*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) x-scale) (/.f64 (*.f64 b b) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) x-scale) (/.f64 (/.f64 (*.f64 b b) y-scale) y-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (/.f64 a y-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 y-scale (*.f64 x-scale y-scale))) a)
(*.f64 (/.f64 a (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale))
(*.f64 (/.f64 a y-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) y-scale) (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) y-scale) (/.f64 (/.f64 (*.f64 b b) y-scale) x-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 a x-scale))
(*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) x-scale))
(*.f64 (*.f64 (/.f64 (*.f64 b b) y-scale) a) (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))) b) (/.f64 b 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 y-scale (*.f64 x-scale y-scale))))))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a #s(literal -4 binary64)))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale (neg.f64 y-scale))))
(neg.f64 (/.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 x-scale y-scale)))
(/.f64 #s(literal -4 binary64) (*.f64 (/.f64 x-scale a) y-scale))
(/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 a #s(literal -4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a #s(literal -4 binary64))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 a #s(literal -4 binary64)) x-scale)))
(/.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) x-scale) y-scale)
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a #s(literal -4 binary64)))))
(/.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) #s(literal 1 binary64)) (*.f64 x-scale y-scale))
(/.f64 (neg.f64 (*.f64 a #s(literal 4 binary64))) (neg.f64 (*.f64 x-scale (neg.f64 y-scale))))
(/.f64 (neg.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) x-scale)) (neg.f64 y-scale))
(/.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) y-scale) x-scale)
(/.f64 (*.f64 (/.f64 a x-scale) #s(literal -4 binary64)) y-scale)
(/.f64 (*.f64 a (/.f64 #s(literal -4 binary64) y-scale)) x-scale)
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal -4 binary64) y-scale)) (/.f64 x-scale a))
(/.f64 (*.f64 (neg.f64 a) (/.f64 #s(literal -4 binary64) y-scale)) (neg.f64 x-scale))
(pow.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a #s(literal -4 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a #s(literal -4 binary64))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 y-scale (/.f64 (*.f64 a #s(literal -4 binary64)) x-scale)) #s(literal -1 binary64))
(*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)))
(*.f64 a (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 #s(literal -4 binary64) y-scale)))
(*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (/.f64 a x-scale) (/.f64 #s(literal -4 binary64) y-scale))
(*.f64 (*.f64 a #s(literal -4 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 #s(literal 1 binary64) (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))))
(*.f64 (*.f64 a #s(literal 4 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (neg.f64 y-scale))))
(*.f64 (/.f64 #s(literal -4 binary64) y-scale) (/.f64 a x-scale))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (*.f64 a #s(literal -4 binary64)))
(*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) x-scale) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)) a)
(*.f64 (/.f64 #s(literal -4 binary64) x-scale) (/.f64 a y-scale))
(*.f64 (/.f64 a y-scale) (/.f64 #s(literal -4 binary64) x-scale))
(*.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)
(*.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 y-scale (*.f64 b b))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (*.f64 b b) (neg.f64 y-scale)))
(neg.f64 (/.f64 (*.f64 b (neg.f64 b)) y-scale))
(/.f64 (*.f64 b b) y-scale)
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (*.f64 b b)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 y-scale (*.f64 b b)) #s(literal 1 binary64)))
(/.f64 (*.f64 b (neg.f64 b)) (neg.f64 y-scale))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 y-scale (*.f64 b b))))
(/.f64 (*.f64 (*.f64 b b) #s(literal 1 binary64)) y-scale)
(/.f64 (neg.f64 (*.f64 b (neg.f64 b))) (neg.f64 (neg.f64 y-scale)))
(pow.f64 (/.f64 y-scale (*.f64 b b)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 y-scale (*.f64 b b)) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 b (/.f64 b y-scale))
(*.f64 (*.f64 b b) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) y-scale))
(*.f64 (*.f64 b (neg.f64 b)) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (*.f64 b b))
(*.f64 (/.f64 b y-scale) b)

eval330.0ms (0.2%)

Memory
30.1MiB live, 851.1MiB allocated
Compiler

Compiled 64 971 to 1 408 computations (97.8% saved)

prune1.5min (64.3%)

Memory
-552.1MiB live, 170 698.0MiB allocated
Pruning

26 alts after pruning (25 fresh and 1 done)

PrunedKeptTotal
New2 029212 050
Fresh12416
Picked415
Done000
Total2 045262 071
Accuracy
96.7%
Counts
2 071 → 26
Alt Table
Click to see full alt table
StatusAccuracyProgram
74.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 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale y-scale) x-scale)) y-scale))
80.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 (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)))
75.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) a) (*.f64 x-scale y-scale)))
75.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 a (*.f64 x-scale y-scale)) (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))) (*.f64 x-scale (neg.f64 y-scale))))
67.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 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
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 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale)))) x-scale))
69.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 b) (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
59.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 y-scale) (*.f64 x-scale y-scale))))
73.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 a #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))))
75.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 #s(literal 4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale (neg.f64 y-scale)) (*.f64 x-scale y-scale))))
73.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 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
68.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 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale)) y-scale) x-scale) (/.f64 a x-scale)))
72.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 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 #s(literal -4 binary64) (*.f64 b b))) y-scale) (/.f64 a x-scale)))
75.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 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)))
70.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 (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))))
59.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 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (*.f64 x-scale x-scale)) (/.f64 b (*.f64 y-scale y-scale))))
74.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 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale y-scale) x-scale)) (/.f64 #s(literal 1 binary64) y-scale)))
74.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 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b))))
86.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 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))) b) (/.f64 b y-scale)) (/.f64 a x-scale)))
86.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 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))) b) b) (/.f64 (/.f64 a x-scale) y-scale)))
62.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
67.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 #s(literal -4 binary64) b) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))))
74.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 b (/.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
73.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 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))))
77.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 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) (/.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))))
34.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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))))
Compiler

Compiled 5 327 to 847 computations (84.1% saved)

regimes227.0ms (0.2%)

Memory
9.7MiB live, 206.3MiB allocated
Counts
87 → 3
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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) (/.f64 b (*.f64 x-scale (*.f64 y-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 b (/.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (*.f64 x-scale (*.f64 y-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 #s(literal -4 binary64) b) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-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 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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) 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 a (*.f64 a b)))) (*.f64 x-scale (*.f64 y-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 (*.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 (*.f64 x-scale y-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 (*.f64 a b) (*.f64 (*.f64 a #s(literal -4 binary64)) 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 (*.f64 a #s(literal -4 binary64)) b) b) 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 #s(literal 4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale (neg.f64 y-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 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (/.f64 a (*.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 #s(literal -4 binary64) x-scale) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.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 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -4 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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)))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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)))))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a 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 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a 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 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (*.f64 x-scale x-scale)) (/.f64 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 (*.f64 a #s(literal -4 binary64)) b) b) x-scale) (/.f64 a (*.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 (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a 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 (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a 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 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (/.f64 b (*.f64 y-scale (*.f64 x-scale y-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 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) a) (*.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 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-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 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale y-scale) 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 (*.f64 x-scale y-scale)) (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))) (*.f64 x-scale (neg.f64 y-scale))))
(/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 x-scale x-scale) y-scale))) (neg.f64 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 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale y-scale) 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))) b) b) (/.f64 (/.f64 a 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 (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))) b) (/.f64 b y-scale)) (/.f64 a 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 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) y-scale)) (/.f64 a 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 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 a 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 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 #s(literal -4 binary64) (*.f64 b b))) y-scale) (/.f64 a 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 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (*.f64 x-scale y-scale)) (/.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a 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 (/.f64 a y-scale) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale) y-scale)) (/.f64 a 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 (/.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale)) y-scale) x-scale) (/.f64 a 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))) (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)))) (*.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))))))
(-.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 y-scale y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) #s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
(/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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))))) y-scale) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale)))) (*.f64 x-scale x-scale))) (neg.f64 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)))
(/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) 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))
(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)))
(/.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)
(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 #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 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.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)))
(/.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))
(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)))
(/.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))
(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)))))
(/.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))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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)))))
(-.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)))
(-.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)))
(-.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 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 (*.f64 (*.f64 (+.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
(-.f64 (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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) 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 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)))
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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)))
(-.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 a #s(literal 4 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)))
(-.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 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)))
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 a #s(literal 4 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)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 b #s(literal 4 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 (*.f64 a a) (+.f64 #s(literal 1/2 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 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #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 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.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 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.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 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (cos.f64 (*.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 a a))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.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 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.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 (cos.f64 (*.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 b b))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (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 (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 #s(approx (+ (* 4 (/ (* (+ (* (* b b) (+ 1/2 (* (cos (* (* angle (PI)) 1/90)) -1/2))) (* (* a a) (+ (* 1/2 (cos (* (* angle (PI)) 1/90))) 1/2))) (+ (* (* a a) (+ 1/2 (* (cos (* (* angle (PI)) 1/90)) -1/2))) (* (* b b) (+ (* 1/2 (cos (* (* angle (PI)) 1/90))) 1/2)))) (* x-scale x-scale))) (* (pow (sin (* (* angle (PI)) 1/90)) 2) (neg (/ (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (* x-scale x-scale))))) (-.f64 (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 #s(literal 1/90 binary64) angle) (PI.f64))) #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 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 x-scale x-scale))))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) y-scale)) (neg.f64 y-scale))
(/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (-.f64 (fma.f64 b (fma.f64 b (fma.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)) 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)) y-scale))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (neg.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) y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 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 #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) y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 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) (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)))
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.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)))
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 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 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 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 (exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #s(literal 1 binary64)))) #s(literal 2 binary64))) y-scale) y-scale)))
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 (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-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 (*.f64 (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))) b) b) (/.f64 (/.f64 a 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 (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))) b) (/.f64 b y-scale)) (/.f64 a x-scale)))
Calls

8 calls:

43.0ms
x-scale
31.0ms
(/.f64 angle #s(literal 180 binary64))
28.0ms
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
25.0ms
y-scale
24.0ms
b
Results
AccuracySegmentsBranch
88.8%2a
90.9%3b
89.2%2angle
86.9%1x-scale
86.9%1y-scale
86.9%1(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 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)))
89.2%2(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
89.2%2(/.f64 angle #s(literal 180 binary64))
Compiler

Compiled 162 to 80 computations (50.6% saved)

regimes49.0ms (0%)

Memory
3.5MiB live, 42.2MiB allocated
Counts
40 → 2
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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) (/.f64 b (*.f64 x-scale (*.f64 y-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 b (/.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (*.f64 x-scale (*.f64 y-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 #s(literal -4 binary64) b) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-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 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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) 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 a (*.f64 a b)))) (*.f64 x-scale (*.f64 y-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 (*.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 (*.f64 x-scale y-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 (*.f64 a b) (*.f64 (*.f64 a #s(literal -4 binary64)) 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 (*.f64 a #s(literal -4 binary64)) b) b) 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 #s(literal 4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale (neg.f64 y-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 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (/.f64 a (*.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 #s(literal -4 binary64) x-scale) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.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 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -4 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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)))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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)))))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a 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 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a 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 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (*.f64 x-scale x-scale)) (/.f64 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 (*.f64 a #s(literal -4 binary64)) b) b) x-scale) (/.f64 a (*.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 (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a 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 (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a 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 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (/.f64 b (*.f64 y-scale (*.f64 x-scale y-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 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) a) (*.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 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-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 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale y-scale) 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 (*.f64 x-scale y-scale)) (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))) (*.f64 x-scale (neg.f64 y-scale))))
(/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 x-scale x-scale) y-scale))) (neg.f64 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 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale y-scale) 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))) b) b) (/.f64 (/.f64 a x-scale) y-scale)))
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 (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-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 (*.f64 (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))) b) b) (/.f64 (/.f64 a x-scale) y-scale)))
Calls

4 calls:

12.0ms
b
11.0ms
(/.f64 angle #s(literal 180 binary64))
11.0ms
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
11.0ms
angle
Results
AccuracySegmentsBranch
86.9%1angle
86.9%1(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
86.9%1(/.f64 angle #s(literal 180 binary64))
89.1%2b
Compiler

Compiled 30 to 26 computations (13.3% saved)

regimes101.0ms (0.1%)

Memory
-6.2MiB live, 73.8MiB allocated
Counts
39 → 3
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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) (/.f64 b (*.f64 x-scale (*.f64 y-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 b (/.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (*.f64 x-scale (*.f64 y-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 #s(literal -4 binary64) b) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-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 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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) 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 a (*.f64 a b)))) (*.f64 x-scale (*.f64 y-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 (*.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 (*.f64 x-scale y-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 (*.f64 a b) (*.f64 (*.f64 a #s(literal -4 binary64)) 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 (*.f64 a #s(literal -4 binary64)) b) b) 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 #s(literal 4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale (neg.f64 y-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 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (/.f64 a (*.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 #s(literal -4 binary64) x-scale) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.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 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -4 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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)))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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)))))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a 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 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a 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 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (*.f64 x-scale x-scale)) (/.f64 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 (*.f64 a #s(literal -4 binary64)) b) b) x-scale) (/.f64 a (*.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 (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a 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 (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a 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 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (/.f64 b (*.f64 y-scale (*.f64 x-scale y-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 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) a) (*.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 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-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 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale y-scale) 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 (*.f64 x-scale y-scale)) (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))) (*.f64 x-scale (neg.f64 y-scale))))
(/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 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) (+ (* 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)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 x-scale x-scale) y-scale))) (neg.f64 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 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale y-scale) 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 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 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-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 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) a) (*.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 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale)))) x-scale))
Calls

8 calls:

22.0ms
y-scale
11.0ms
b
11.0ms
a
11.0ms
(/.f64 angle #s(literal 180 binary64))
11.0ms
angle
Results
AccuracySegmentsBranch
82.6%2angle
82.6%2(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
82.6%2(/.f64 angle #s(literal 180 binary64))
82.5%2y-scale
82.2%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) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 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)))
84.4%3x-scale
80.6%1a
88.3%3b
Compiler

Compiled 162 to 80 computations (50.6% saved)

regimes13.0ms (0%)

Memory
-22.2MiB live, 16.7MiB allocated
Counts
32 → 3
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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) (/.f64 b (*.f64 x-scale (*.f64 y-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 b (/.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (*.f64 x-scale (*.f64 y-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 #s(literal -4 binary64) b) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-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 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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) 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 a (*.f64 a b)))) (*.f64 x-scale (*.f64 y-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 (*.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 (*.f64 x-scale y-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 (*.f64 a b) (*.f64 (*.f64 a #s(literal -4 binary64)) 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 (*.f64 a #s(literal -4 binary64)) b) b) 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 #s(literal 4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale (neg.f64 y-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 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (/.f64 a (*.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 #s(literal -4 binary64) x-scale) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.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 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -4 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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)))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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)))))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a 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 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a 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 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (*.f64 x-scale x-scale)) (/.f64 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 (*.f64 a #s(literal -4 binary64)) b) b) x-scale) (/.f64 a (*.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 (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a 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 (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a 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 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (/.f64 b (*.f64 y-scale (*.f64 x-scale y-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 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) a) (*.f64 x-scale y-scale)))
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 #s(literal 4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale (neg.f64 y-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 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) a) (*.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 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale)))) x-scale))
Calls

1 calls:

10.0ms
b
Results
AccuracySegmentsBranch
86.3%3b
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes12.0ms (0%)

Memory
13.9MiB live, 13.9MiB allocated
Counts
31 → 3
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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) (/.f64 b (*.f64 x-scale (*.f64 y-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 b (/.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (*.f64 x-scale (*.f64 y-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 #s(literal -4 binary64) b) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-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 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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) 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 a (*.f64 a b)))) (*.f64 x-scale (*.f64 y-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 (*.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 (*.f64 x-scale y-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 (*.f64 a b) (*.f64 (*.f64 a #s(literal -4 binary64)) 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 (*.f64 a #s(literal -4 binary64)) b) b) 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 #s(literal 4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale (neg.f64 y-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 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (/.f64 a (*.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 #s(literal -4 binary64) x-scale) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.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 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -4 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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)))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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)))))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a 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 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a 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 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (*.f64 x-scale x-scale)) (/.f64 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 (*.f64 a #s(literal -4 binary64)) b) b) x-scale) (/.f64 a (*.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 (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a 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 (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a 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 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale)))) x-scale))
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 #s(literal 4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale (neg.f64 y-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 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (/.f64 a (*.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 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale)))) x-scale))
Calls

1 calls:

9.0ms
b
Results
AccuracySegmentsBranch
85.5%3b
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes12.0ms (0%)

Memory
8.2MiB live, 8.2MiB allocated
Counts
30 → 3
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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) (/.f64 b (*.f64 x-scale (*.f64 y-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 b (/.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (*.f64 x-scale (*.f64 y-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 #s(literal -4 binary64) b) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-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 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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) 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 a (*.f64 a b)))) (*.f64 x-scale (*.f64 y-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 (*.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 (*.f64 x-scale y-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 (*.f64 a b) (*.f64 (*.f64 a #s(literal -4 binary64)) 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 (*.f64 a #s(literal -4 binary64)) b) b) 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 #s(literal 4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale (neg.f64 y-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 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (/.f64 a (*.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 #s(literal -4 binary64) x-scale) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.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 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -4 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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)))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) 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)))))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.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 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a 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 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a 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 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (*.f64 x-scale x-scale)) (/.f64 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 (*.f64 a #s(literal -4 binary64)) b) b) x-scale) (/.f64 a (*.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 (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a 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 (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 a x-scale)))
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 #s(literal 4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale (neg.f64 y-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 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (/.f64 a (*.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 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b))))
Calls

1 calls:

8.0ms
b
Results
AccuracySegmentsBranch
84.8%3b
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes176.0ms (0.1%)

Memory
-3.4MiB live, 34.9MiB allocated
Counts
18 → 1
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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) (*.f64 (*.f64 angle angle) #s(literal 0 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 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) (/.f64 b (*.f64 x-scale (*.f64 y-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 b (/.f64 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (*.f64 x-scale (*.f64 y-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 #s(literal -4 binary64) b) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-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 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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) 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 a (*.f64 a b)))) (*.f64 x-scale (*.f64 y-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 (*.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a 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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 (*.f64 x-scale y-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 (*.f64 a b) (*.f64 (*.f64 a #s(literal -4 binary64)) 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) 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 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 (*.f64 a #s(literal -4 binary64)) b) b) 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 #s(literal 4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale (neg.f64 y-scale)) (*.f64 x-scale y-scale))))
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 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) (/.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))))
Calls

8 calls:

135.0ms
(/.f64 angle #s(literal 180 binary64))
6.0ms
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
5.0ms
x-scale
5.0ms
a
5.0ms
b
Results
AccuracySegmentsBranch
77.9%1a
77.9%1(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 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)))
77.9%1y-scale
77.9%1angle
77.9%1(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
77.9%1(/.f64 angle #s(literal 180 binary64))
77.9%1x-scale
77.9%1b
Compiler

Compiled 162 to 80 computations (50.6% saved)

regimes14.0ms (0%)

Memory
15.9MiB live, 15.9MiB allocated
Accuracy

Total -7.1b remaining (-16.9%)

Threshold costs -7.1b (-16.9%)

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

8 calls:

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

Compiled 162 to 80 computations (50.6% saved)

bsearch388.0ms (0.3%)

Memory
-16.1MiB live, 139.6MiB allocated
Algorithm
binary-search
Stop Event
predicate-same
narrow-enough
Steps
TimeLeftRight
109.0ms
2.5533729031118514e+212
3.115851326297903e+214
87.0ms
7.169397351708589e-202
1.0911573026032905e-198
Samples
137.0ms127×1valid
28.0ms28×2valid
20.0ms85×0valid
0.0ms1exit
Compiler

Compiled 837 to 489 computations (41.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 173.0ms
ival-cos: 43.0ms (24.9% of total)
ival-sin: 39.0ms (22.6% of total)
ival-mult: 31.0ms (17.9% of total)
ival-pow2: 24.0ms (13.9% of total)
ival-div: 18.0ms (10.4% of total)
adjust: 8.0ms (4.6% of total)
ival-sub: 4.0ms (2.3% of total)
ival-add: 4.0ms (2.3% of total)
ival-pi: 2.0ms (1.2% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch134.0ms (0.1%)

Memory
-8.8MiB live, 76.3MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
126.0ms
8.150262928510593e-222
2.1653127383749803e-218
Samples
84.0ms66×1valid
26.0ms16×2valid
11.0ms46×0valid
Compiler

Compiled 501 to 279 computations (44.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 114.0ms
ival-div: 33.0ms (29% of total)
ival-mult: 25.0ms (22% of total)
ival-sin: 19.0ms (16.7% of total)
ival-cos: 16.0ms (14.1% of total)
ival-pow2: 10.0ms (8.8% of total)
adjust: 4.0ms (3.5% of total)
ival-sub: 2.0ms (1.8% of total)
ival-add: 2.0ms (1.8% of total)
ival-pi: 1.0ms (0.9% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch172.0ms (0.1%)

Memory
-5.4MiB live, 106.7MiB allocated
Algorithm
binary-search
Stop Event
predicate-same
narrow-enough
Steps
TimeLeftRight
62.0ms
1.495746515674114e+145
5.596810932448135e+146
93.0ms
7.241278014143942e-163
3.269567365497123e-156
Samples
103.0ms110×1valid
24.0ms16×2valid
19.0ms82×0valid
Compiler

Compiled 741 to 415 computations (44% saved)

Precisions
Click to see histograms. Total time spent on operations: 136.0ms
ival-div: 25.0ms (18.4% of total)
ival-cos: 25.0ms (18.4% of total)
ival-mult: 24.0ms (17.6% of total)
ival-sin: 23.0ms (16.9% of total)
ival-pow2: 17.0ms (12.5% of total)
ival-add: 12.0ms (8.8% of total)
adjust: 6.0ms (4.4% of total)
ival-sub: 4.0ms (2.9% of total)
ival-pi: 1.0ms (0.7% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch50.0ms (0%)

Memory
6.7MiB live, 50.1MiB allocated
Algorithm
binary-search
Stop Event
predicate-same
narrow-enough
Steps
TimeLeftRight
0.0ms
1.495746515674114e+145
5.596810932448135e+146
46.0ms
7.241278014143942e-163
3.269567365497123e-156
Samples
24.0ms28×1valid
14.0ms32×0valid
4.0ms2valid
Compiler

Compiled 750 to 433 computations (42.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 40.0ms
ival-div: 11.0ms (27.8% of total)
ival-mult: 7.0ms (17.7% of total)
ival-sin: 7.0ms (17.7% of total)
ival-cos: 6.0ms (15.2% of total)
ival-pow2: 5.0ms (12.7% of total)
ival-sub: 1.0ms (2.5% of total)
ival-add: 1.0ms (2.5% of total)
adjust: 1.0ms (2.5% of total)
ival-pi: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch126.0ms (0.1%)

Memory
14.7MiB live, 90.5MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
32.0ms
3.292993362278477e+141
3.738488914649059e+141
87.0ms
2.2326064057078927e-134
4.5051981593891484e-133
Samples
74.0ms73×1valid
32.0ms64×0valid
6.0ms2valid
Compiler

Compiled 556 to 315 computations (43.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 99.0ms
ival-pow2: 28.0ms (28.3% of total)
ival-cos: 19.0ms (19.2% of total)
ival-sin: 17.0ms (17.2% of total)
ival-mult: 16.0ms (16.2% of total)
ival-div: 10.0ms (10.1% of total)
adjust: 4.0ms (4% of total)
ival-sub: 2.0ms (2% of total)
ival-add: 2.0ms (2% of total)
ival-pi: 1.0ms (1% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory
1.3MiB live, 1.3MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
0.0ms
3.292993362278477e+141
3.738488914649059e+141
1.0ms
2.2326064057078927e-134
4.5051981593891484e-133
Compiler

Compiled 556 to 315 computations (43.3% saved)

simplify50.0ms (0%)

Memory
-14.5MiB live, 22.5MiB allocated
Algorithm
egg-herbie
Rules
80×*-commutative_binary64
24×+-commutative_binary64
24×sub-neg_binary64
24×neg-sub0_binary64
24×neg-mul-1_binary64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01622560
11942560
22032560
32122560
42212560
52332560
62462560
72612560
82752560
92812560
102832560
Stop Event
saturated
Calls
Call 1
Inputs
(if (<=.f64 b #s(literal 6398156625198305/5515652263101987298728728207430913795608113109085112352897269396216198887424215820128660001943808587833784893551335930816647064191168732319583111500951066614122648616177179922993422016587311577585463592732098692120576 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 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))) (if (<=.f64 b #s(literal 3600000000000000123044600086363632139361382601422188751432075705312243652663260116885575139867317372141756913129262071312164750396968557023782679656449052499259744996087573187306972220455428449587308668730505953280 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 (*.f64 (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))) b) b) (/.f64 (/.f64 a 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 (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))) b) (/.f64 b y-scale)) (/.f64 a x-scale)))))
(if (<=.f64 b #s(literal 1526187385455289/25436456424254815193480879938969641865328820504439957276902228591018818808813598905645111850248543894740790979741795503409915167442777118989423202714274711784725790327125604852535546439788108920017108978789850624014628402852922291912704 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 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-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 (*.f64 (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))) b) b) (/.f64 (/.f64 a x-scale) y-scale))))
(if (<=.f64 b #s(literal 5193938430935195/247330401473104534060502521019647190035131349101211839914063056092897225106531867170316401061243044989597671426016139339351365034306751209967546155101893167916606772148699136 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 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))) (if (<=.f64 b #s(literal 499999999999999988998191202828830087182411944733900540386126622484631969614553746213463024711630256984884134207768538734419216153365573197681917952 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 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) a) (*.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 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale)))) x-scale))))
(if (<=.f64 b #s(literal 1360317208102075/123665200736552267030251260509823595017565674550605919957031528046448612553265933585158200530621522494798835713008069669675682517153375604983773077550946583958303386074349568 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 #s(literal 4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale (neg.f64 y-scale)) (*.f64 x-scale y-scale)))) (if (<=.f64 b #s(literal 499999999999999988998191202828830087182411944733900540386126622484631969614553746213463024711630256984884134207768538734419216153365573197681917952 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 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) a) (*.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 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale)))) x-scale))))
(if (<=.f64 b #s(literal 1304241570333619/12786682062094304179739022253232809188346257992355721833919106906625522642205759980012773798148063113870651109873281527379754908382364816614564560896 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 #s(literal 4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale (neg.f64 y-scale)) (*.f64 x-scale y-scale)))) (if (<=.f64 b #s(literal 3700000000000000282811437594878884636519281655526696991526302320441981430979821630467817929482559808276780514992522514453255149452281946046464 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 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (/.f64 a (*.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 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale)))) x-scale))))
(if (<=.f64 b #s(literal 1304241570333619/12786682062094304179739022253232809188346257992355721833919106906625522642205759980012773798148063113870651109873281527379754908382364816614564560896 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 #s(literal 4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale (neg.f64 y-scale)) (*.f64 x-scale y-scale)))) (if (<=.f64 b #s(literal 3700000000000000282811437594878884636519281655526696991526302320441981430979821630467817929482559808276780514992522514453255149452281946046464 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 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (/.f64 a (*.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 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) 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)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) (/.f64 b (*.f64 x-scale (*.f64 y-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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))))
Outputs
(if (<=.f64 b #s(literal 6398156625198305/5515652263101987298728728207430913795608113109085112352897269396216198887424215820128660001943808587833784893551335930816647064191168732319583111500951066614122648616177179922993422016587311577585463592732098692120576 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 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))) (if (<=.f64 b #s(literal 3600000000000000123044600086363632139361382601422188751432075705312243652663260116885575139867317372141756913129262071312164750396968557023782679656449052499259744996087573187306972220455428449587308668730505953280 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 (*.f64 (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))) b) b) (/.f64 (/.f64 a 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 (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))) b) (/.f64 b y-scale)) (/.f64 a x-scale)))))
(if (<=.f64 b #s(literal 6398156625198305/5515652263101987298728728207430913795608113109085112352897269396216198887424215820128660001943808587833784893551335930816647064191168732319583111500951066614122648616177179922993422016587311577585463592732098692120576 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 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 b a)))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))) (if (<=.f64 b #s(literal 3600000000000000123044600086363632139361382601422188751432075705312243652663260116885575139867317372141756913129262071312164750396968557023782679656449052499259744996087573187306972220455428449587308668730505953280 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 (*.f64 b (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))))) (/.f64 (/.f64 a 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 a x-scale) (*.f64 (*.f64 b (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)))) (/.f64 b y-scale))))))
(if (<=.f64 b #s(literal 1526187385455289/25436456424254815193480879938969641865328820504439957276902228591018818808813598905645111850248543894740790979741795503409915167442777118989423202714274711784725790327125604852535546439788108920017108978789850624014628402852922291912704 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 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-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 (*.f64 (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))) b) b) (/.f64 (/.f64 a x-scale) y-scale))))
(if (<=.f64 b #s(literal 1526187385455289/25436456424254815193480879938969641865328820504439957276902228591018818808813598905645111850248543894740790979741795503409915167442777118989423202714274711784725790327125604852535546439788108920017108978789850624014628402852922291912704 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 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 b a)))) (*.f64 x-scale y-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 (*.f64 b (*.f64 a (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))))) (/.f64 (/.f64 a x-scale) y-scale))))
(if (<=.f64 b #s(literal 5193938430935195/247330401473104534060502521019647190035131349101211839914063056092897225106531867170316401061243044989597671426016139339351365034306751209967546155101893167916606772148699136 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 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))) (if (<=.f64 b #s(literal 499999999999999988998191202828830087182411944733900540386126622484631969614553746213463024711630256984884134207768538734419216153365573197681917952 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 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) a) (*.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 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale)))) x-scale))))
(if (<=.f64 b #s(literal 5193938430935195/247330401473104534060502521019647190035131349101211839914063056092897225106531867170316401061243044989597671426016139339351365034306751209967546155101893167916606772148699136 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 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 b a)))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))) (if (<=.f64 b #s(literal 499999999999999988998191202828830087182411944733900540386126622484631969614553746213463024711630256984884134207768538734419216153365573197681917952 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 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-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 (*.f64 a (*.f64 b (*.f64 a #s(literal -4 binary64)))) (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale)))) x-scale))))
(if (<=.f64 b #s(literal 1360317208102075/123665200736552267030251260509823595017565674550605919957031528046448612553265933585158200530621522494798835713008069669675682517153375604983773077550946583958303386074349568 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 #s(literal 4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale (neg.f64 y-scale)) (*.f64 x-scale y-scale)))) (if (<=.f64 b #s(literal 499999999999999988998191202828830087182411944733900540386126622484631969614553746213463024711630256984884134207768538734419216153365573197681917952 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 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) a) (*.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 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale)))) x-scale))))
(if (<=.f64 b #s(literal 1360317208102075/123665200736552267030251260509823595017565674550605919957031528046448612553265933585158200530621522494798835713008069669675682517153375604983773077550946583958303386074349568 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 #s(literal 4 binary64) (*.f64 (*.f64 a (*.f64 b a)) (neg.f64 b))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) (if (<=.f64 b #s(literal 499999999999999988998191202828830087182411944733900540386126622484631969614553746213463024711630256984884134207768538734419216153365573197681917952 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 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-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 (*.f64 a (*.f64 b (*.f64 a #s(literal -4 binary64)))) (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale)))) x-scale))))
(if (<=.f64 b #s(literal 1304241570333619/12786682062094304179739022253232809188346257992355721833919106906625522642205759980012773798148063113870651109873281527379754908382364816614564560896 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 #s(literal 4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale (neg.f64 y-scale)) (*.f64 x-scale y-scale)))) (if (<=.f64 b #s(literal 3700000000000000282811437594878884636519281655526696991526302320441981430979821630467817929482559808276780514992522514453255149452281946046464 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 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (/.f64 a (*.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 (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b)) (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale)))) x-scale))))
(if (<=.f64 b #s(literal 1304241570333619/12786682062094304179739022253232809188346257992355721833919106906625522642205759980012773798148063113870651109873281527379754908382364816614564560896 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 #s(literal 4 binary64) (*.f64 (*.f64 a (*.f64 b a)) (neg.f64 b))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) (if (<=.f64 b #s(literal 3700000000000000282811437594878884636519281655526696991526302320441981430979821630467817929482559808276780514992522514453255149452281946046464 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 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (/.f64 a (*.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 (*.f64 a (*.f64 b (*.f64 a #s(literal -4 binary64)))) (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale)))) x-scale))))
(if (<=.f64 b #s(literal 1304241570333619/12786682062094304179739022253232809188346257992355721833919106906625522642205759980012773798148063113870651109873281527379754908382364816614564560896 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 #s(literal 4 binary64) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (*.f64 x-scale (neg.f64 y-scale)) (*.f64 x-scale y-scale)))) (if (<=.f64 b #s(literal 3700000000000000282811437594878884636519281655526696991526302320441981430979821630467817929482559808276780514992522514453255149452281946046464 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 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (/.f64 a (*.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 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 a (*.f64 (*.f64 a #s(literal -4 binary64)) b))))))
(if (<=.f64 b #s(literal 1304241570333619/12786682062094304179739022253232809188346257992355721833919106906625522642205759980012773798148063113870651109873281527379754908382364816614564560896 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 #s(literal 4 binary64) (*.f64 (*.f64 a (*.f64 b a)) (neg.f64 b))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) (if (<=.f64 b #s(literal 3700000000000000282811437594878884636519281655526696991526302320441981430979821630467817929482559808276780514992522514453255149452281946046464 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 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (/.f64 a (*.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 a (*.f64 b (*.f64 a #s(literal -4 binary64)))) (/.f64 b (*.f64 x-scale (*.f64 y-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 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) (/.f64 b (*.f64 x-scale (*.f64 y-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 a (*.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) (/.f64 b (*.f64 x-scale (*.f64 y-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))) #s(approx (+ (* (* angle angle) (+ (* 1/8100 (/ (* (* (+ b a) (- b a)) (* (* (+ b a) (- b a)) (* (PI) (PI)))) (* x-scale (* x-scale (* y-scale y-scale))))) (* -4 (+ (* b (* b (/ (* (* (PI) (PI)) (+ (* -1/32400 (* a a)) (* 1/32400 (* b b)))) (* x-scale (* x-scale (* y-scale y-scale)))))) (/ (* (* a a) (* (* (PI) (PI)) (+ (* -1/32400 (* b b)) (* 1/32400 (* a a))))) (* x-scale (* x-scale (* y-scale y-scale)))))))) (/ (* (* -4 (* b b)) (* a a)) (* x-scale (* x-scale (* y-scale y-scale))))) #s(approx (* (* angle angle) 0) #s(literal 0 binary64))))

soundness1.4s (1%)

Memory
23.3MiB live, 1 150.6MiB allocated
Rules
11 112×lower-fma.f64
11 112×lower-fma.f32
9 850×lower-*.f64
9 850×lower-*.f32
7 336×lower-fma.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01111014
0138872
1666834
26463799
08230784
01621313
02151161
11024978
09008967
045216440
1176515416
0852515091
01531312
02691193
19651033
085611028
0136555891
1523253423
0847351460
0159562954
1604759932
0894858039
Stop Event
fuel
iter limit
node limit
iter limit
node limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
Compiler

Compiled 1 985 to 1 069 computations (46.1% saved)

preprocess108.0ms (0.1%)

Memory
-11.1MiB live, 105.4MiB allocated
Remove

(abs a)

(abs angle)

(abs x-scale)

(abs y-scale)

Compiler

Compiled 2 596 to 930 computations (64.2% saved)

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

Profiling

Loading profile data...